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ABSTRACT 


A  categorical  analysis  was  made  of  five  languages.  The 
sounds  of  speech  were  simulated  using  written  text  converted 
via  International  Phonetic  Alphabet  (IPA) .  The  sounds  of 
speech  were  identified  as  members  of  fricative,  nasal,  stop, 
or  vowel  categories.  A  statistical  analysis  was  performed 
on  categorical  content  of  one  (at  various  positions  in  the 
word) ,  two,  and  three  sound  combinations. 

Several  attempts  to  achieve  a  differentiation  scheme  were 
made  before  any  success  was  realized.  Two  methods  for 
developing  conditional  expectation  are  compared;  Bayes* 
Conditional  Probability  Rule,  and  Cook's  Prognostic 
Progression. 

Statistical  analysis  and  "loop"  tests  indicated  that 
languages  do  have  unique  patterns  and  can  be  differentiated 
on  the  statistics  contained  in  the  first  three  sounds.  1003 
correct  decisions  were  achieved  for  as  few  as  five  words  in 
the  loop  test.  Limited  base  data  negated  result  significance 
beyond  three  successive  sounds. 
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I.   INTRODUCTION 

A.   LANGUAGE  PROBLEMS,  GENERAL 

There  has  existed  for  a  great  many  years  the  desire  and 
requirement  to  differentiate  languages  both  categorically 
and  specifically.  It  is  relatively  easy  to  accept  that  a 
person  can  mentally  detect  an  unknown  foreign  language  and 
guess  (often  accurately)  its  origin.  However,  this  mental 
process  has  not  been  successfully  duplicated  using 
mechanical/electrical  devices  is  spite  of  research   efforts. 

Language  barriers  have  historically  been  major  opponents 
of  international  well-being.  Interpreters  bridged  many 
gaps,  however,  the  lack  of  multi-linguists  necessitated  the 
need  for  a  large  number  of  bi-lingual  specialists. 
Therefore,  a  pool  of  interpreters  is  required  to  conduct  the 
routine  business  of  international  relations.  Linguist 
selection  is  simplified  for  some  physical  characteristics, 
however,  it  would  be  quite  embarrassing  to  select  a  Chinese 
translator  for  a  Korean  dignitary.  Modern  voice 
communications  eliminate  all  physical  characteristics  except 
those  representative  of  the  speaker  and  his  language.  The 
question  then,  was  whether  the  sound  content  itself 
contained  sufficient  information  of  a  unique  quality 
(language  dependent)  so  as  to  make  it  distinguishable  from 
all  other  possibilities.  Certainly  it  is  desirable  to 
establish  communications  expediently  and  correctly. 

Languages  are  coded  utterances,  therefore,  it  seems 
possible  to  differentiate  the  languages  by  recognizing  the 
type  and  quality  of  code  being  used.  A  "guess"  as  noted 
above  has  some  merit,  but  lacks  the  continual  precision 
available  in  a  machine  (computer) . 


B.   WRITTEN  LANGUAGES 

Written  communications  have  been  developed  based  on 
either  the  interpretation  of  the  coded  sound  or  a  picture 
representing  the  item  one  desires  to  convey.  Not 
surprisingly  there  has  been  a  move  in  the  interest  of 
internationalism  to  convert  the  pictorial  forms  of  some 
written  languages  to  the  Romanized  script.  Most  apparent 
was  the  recent  introduction  of  "PINYIN"  to  the  Chinese 
language  [Ref.  1  ].  One  intent  of  the  conversion  is  the 
introduction  of  phonetics  to  the  school  systems  to  establish 
proper  pronunciation.  The  accepted  international  languages 
are  English,  French,  and  Spanish.  Since  these  languages  are 
Romanized,  the  conversion  from  pictorial  to  Roman  suggests 
that  future  generations  will  be  less  burdened  in  mastering  a 
second  language.  In  the  conversion  the  ideograms  are 
phonetically  transcribed  using  the  IPA  (discussed  in  section 
II). 

Phonetics,  then,  is  a  basis  through  which  sounds  are 
transcripted  and  establishes  a  common  base  between  the 
spoken  and  written  word.  It  is  the  purpose  of  this  paper  to 
establish  the  feasibility  of  automatically  differentiating 
languages  based  on  the  average  phonemic  content  over  various 
input  lengths.  The  source  data  used  was  various  phonetic 
transcriptions  of  the  selected  test  languages.  The 
reference  data  is  based  on  transcripted  word  frequency  (for 
usage)  lists,  some  text  selections,  and  conversation  samples 
for  each  of  the  selected  test  languages.  The  reference  data 
is  used  to  establish  matrices  of  probability  which  measure 
the  sound  types  and  sequences  in  languages. 
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C.   SPEECH 

Speech,  as  stated  earlier,  is  any  length  of  coded 
utterances.  An  utterance  is  herein  defined  as  the  forced 
emission  of  modulated  air  from  an  oral  or  nasal  orifice. 
Coding  implies  that  some  means  is  applied  to  modify  the  air 
from  its  zero  state.  The  zero  state  is  defined  as 
unmodulated  inhaled  or  exhaled  air,  i.e.,  normal  breathing 
patterns.  The  modification  or  modulation  of  the  air  is 
achieved  by  the  mechanisms  of  speech  to  produce  audible 
sound  waves.  The  mechanics  of  speech  are  discussed  in  some 
detail  in  Appendices  A  and  B. 

The  coding  or  modulation  of  air  flow  is  classified  into 
the  major  categories:  vowels  (V) ,  stops  (S) ,  fricatives 
(F) ,  and  nasals  (N) .  These  categories  are  further 
subclassified  into  individual  sounds  which  are  unigue  in 
their  generation  and  in  the  characteristics  of  the  modulated 
pressure  wave  output.  A  more  detailed  description  of  these 
categories  can  be  found  in  section  2  of  Appendix  A. 

The  unigueness  of  certain  sounds  has  been  a  detrimental 
aspect  to  experimenters  in  the  area  of  synthetic  voice 
generation.  Conversely,  certain  categories  have  striking 
similiarities  which  allow  simulator  redundancy.  In  the 
vowel  category,  Dr.  Rosenblum  (Ref.  2]  demonstrated  how  one 
vowel  sound  could  be  converted  directly  to  another  by  means 
of  selective  formant  filtering.  Other  works  with  specific 
sound  categories  are  discussed  in  section  3  of  Appendix  A. 

The  pause  is  a  special  case  of  coded  output,  and  is  an 
essential  element  in  speech  analysis.  Potter,  Kopp,  and 
Kopp  [Ref.  3]  interpreted  long  strings  of  sounds  as  recorded 
on  a  spectrogram  after  they  had  first  recorded  the  series 
"word — pause — word — pause"  spectrograms  and  were  sure  where 
the  word  boundaries  occurred.   In  speech  the  pauses   provide 
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a   starting  and  ending  point  for  analysis.   The  time  between 
pauses  is  random,  as  is  the  actual  length  of  the  pause. 

The  data  between  the  pauses  is  composed  of  sounds  from 
the  major  categories,  and  for  this  analysis  it  was  assumed 
that  the  sounds  could  be  identified  at  least  categorically, 
and  removed  for  analysis.  The  actual  conversion  of  spoken 
speech  into  a  form  for  analysis  was  accomplished  indirectly 
via  phonetic  transcriptions  which  is  the  subject  of  part 
III. 
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II.    ANALYSIS  TECHNIQUES 


In  the  90th  meeting  of  the  Acoustic  Society  of  America, 
150  different  papers  were  presented  on  various  research 
efforts  being  done  in  the  voice/speech  field  [Ref.  4].  The 
speakers  varied  from  language  teachers,  phoneticians,  etc. , 
to  medical  doctors,  psychologists,  physicists,  and 
engineers.  They  represented  various  universities,  and 
private  organizations  from  the  Onited  States  and  abroad. 
There  were  several  papers  which  looked  into  differences  in 
languages,  but  were  microscopic  in  nature.  They  were 
concerned  with  the  specific  functions  of  the  system  which 
made  certain  vowel  or  consonant  sounds  in  one  language  vary 
from  another,  i.e.,  why  a  palatilized  "i"  sound  varied  from 
the  non-palatilized  "i.'r  More  specifically  is  it  only  the 
palatilizaticn  or  are  other  factors  involved.  For  example 
some  looked  at  sound  clusters  of  vowel-consonant 
combinations  (VCVVCCV) ,  and  focused  on  the  fact  that 
certainly  a  palatalized  "i"  is  forced  by  the  sound 
preceeding  or  succeeding  the  "i"  sound.  Other  studies  were 
slanted  toward  speaker  recognition  schemes.  Some  were  done 
in  languages  other  than  their  own,  while  others  looked  at 
recognition  criteria  in  their  native  languages.  These 
latter  results  in  general  hinted  that  language  dependent 
factors  do  exist.  Note  that  when  transcriptions  are  used 
speaker  dependence  is  somewhat  removed,  i.e.,  the  method  of 
speaking  (dialect)  is  retained,  however,  the  properties 
unique  to  the  speaker  (fundamental  frequency,  muscle 
impairment,  nose  size  and  shape,  etc.)  are  absent. 
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III.     ilONJTIC  TRANSCRIPTIONS 


A.   HISTORY 


1 •    General  Background 

Using  symbols  as  a  means  of  communications  goes 
back  through  several  civilizations.  It  is  almost  academic 
to  determine  whether  hieroglyphic  styles  came  prior  to, 
concurrently  or  after  vocalized  descriptions.  The  fact  is 
that  a  means  to  convey  thought  other  than  by  vocalization 
was  required,  and  developed.  The  various  alphabets  used 
throughout  the  world  have  certainly  proven  themselves  able 
vehicles  inside  of  their  boundaries,  but  simultaneously 
represent  an  additional  hurdle  to  commonality  across 
language  boundaries.  There  are  approximately  thirty 
different  alphabets  currently  being  used  throughout  the 
world.  It  was  not  documented  until  the  ninteenth  century 
that  the  presently  used  alphabets  were  deemed  to  be 
deficient.  Potter,  Kopp,  and  Kopp  [ Ref .  3,  p.  1]  point  out 
that  Melvin  Bell  (father  of  Alexander  Graham  Bell)  developed 
a  set  of  symbols  which  specified  the  pronunciation  of  words 
so  accurately,  that  anyone  familiar  with  the  system  could 
repeat  the  word  precisely.  Bell*s  contribution  was 
primarily  aimed  as  an  aid  for  the  deaf,  although  it  also 
made  a  definite  impact  on  the  fields  of  language,  phonetics, 
and  the  electronic  analysis  of  speech;  e.g.,  the  sound 
spectrograph  was  certainly  a  by-product  of  the  search  for  a 
visible  means  to  convey  what  is  heard.  A  brief  description 
of  the  sound  spectrograph  is  given  in  Appendix  A. 

2.    Development  of  the  IPA 

Language  teachers,  in  the  mid  1800's,  recognized 
certain  limitations  in  their  ability  to  teach  proper 
pronunciation  using  traditional  alphabets.  Many  teachers 
circumvented  these  limitations  by  developing  symbols  to 
describe  the  type  of  sound  required.   As  communications   and 
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transportation  technology  bridged  the  gaps  between  teachers 
they  began  to  discover  that  others  were  having  problems 
similiar  to  their  own,  thus  informal  teacher  collectives 
were  formed.  The  International  Phonetic  Association  [Ref. 
5]  attribute  their  origin  largely  to  the  efforts  of  Paul 
Passy  who  headed  a  small  group  of  language  teachers  in 
France  in  1886.  Passy  and  his  colleagues  found  that  the  26 
characters  in  the  Roman  alphabet  were  largely  inadequate 
when  trying  to  teach  proper  pronunciation.  Many  sounds  for 
the  same  letter  or  combination  of  letters  were  in  fact 
generated  in  the  vocal  system  with  distinctly  different 
mechanics.  Armed  with  this  information,  they  drew  up  a  new 
alphabet  to  fulfill  their  needs.  The  new  alphabet  was 
composed  entirely  of  symbols  each  of  which  represented  a 
unique  sound.  Their  new  alphabet  was  fully  defined  and  used 
throughout  the  text  of  the  first  publication  of  the 
periodical  "Dhi  Eonetik  Titcer  [Ref.  5]."  Others  were  drawn 
by  this  unique  idea  and  subsequent  events  resulted  in  the 
formation  of  the  International  Phonetic  Association.  The 
work  of  Samuel  Bell  was  done  independently  of  the  European 
group,  and  his  symbols  actualy  resembled  hieroglyphic 
techniques,  rather  than  an  expanded  version  of  the  Roman 
alphabet,  which  was  the  objective  of  Passy.  Therefore, 
Bell's  alphabet  faded  with  time.  The  association  grew  as 
numerous  inputs  were  made  from  various  other  countries  and 
field-phoneticians.  Eventually  a  collection  of  phonetic 
transcriptions  of  languages  (English  et  al)  were  assembled, 
and  the  IPA  was  expanded  to  include  sounds  unique  to 
previously  unavailable  language  transcriptions.  This  work 
across  language  boundaries  enabled  many  languages  to  be 
taught  much  more  easily  both  in  native  and  second  languages. 
Heretofore,  languages  could  be  described  by  the  basic 
parameters  as  usual  using  the  unique  structures  and 
additionally  by  those  sound  production  techniques  unique  to 
a  specific  language. 
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In  the  IPA  every  symbol  has  a  distinct  sound  associated 
with  it.  There  are  some  89  different  symbols  encompassing 
all  but  the  African  languages  as  noted  by  Dr.  Francis 
Cartier  [Ref  6].  Only  43  of  these  symbols  appear  in 
American  English,  (depending  on  the  reference  used;  general 
range  is  42-46) ,  which  makes  its  transcription  much  easier. 
In  "The  Phonetic  Alphabet,"  Dr.  Cartier  describes  in  detail 
the  techniques  of  transcripting  the  English  language,  and 
has  a  small  treatment  of  other  languages  and  non-sense  words 
[Ref.  6].  In  order  that  the  technique  for  this  research  be 
expandable  to  eventually  include  all  languages  a  computer 
version  was  developed  for  101  IPA  characters. 

B.   THE  TRANSCRIPTION 

A  transcription  consists  of  writing  (in  symbols)  the 
sounds  one  makes  when  speaking.  This  can  be  accomplished 
quite  effectively  (after  training)  in  either  a  native 
language  or  a  language  for  which  adequate  knowledge  of 
proper  pronunciation  is  known  first-hand.  If  the  language 
is  foreign  to  the  transcriptor  there  is  considerable  room 
for  error,  particularly  if  sessions  cannot  be  spread  so  as 
to  keep  the  speaker,  interpreter,  and  transcriptor  in  a 
fresh  state  of  mind.  If  a  transcriptor  is  transcripting 
from  an  unknown  language,  which  appears  close  to  one  he  is 
vaguely  familiar  with  he  will  tend  to  do  the  transcription 
in  the  symbols  and  forms  associated  with  the  most  familiar 
language  until  he  has  a  key  to  the  language  being 
transcribed,  then  he  will  retrace  and  make  whatever 
corrections  are  required  to  maintain  the  quality 
(uniqueness)  of  that  language  [Ref.  7].  This  could  lead  to 
an  erroneous  transcription  if  a  key  group  of  words  were  not 
located,  and/or  the  language  had  not  been  the  subject  of  a 
detailed  analysis  to  determine  which  if  any  sounds  were 
definitely  unique  to  that  lanquage.  Another  problem 
presented  along  these  same  lines   is   dialect.    The   simple 
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word  "the"  can  be  properly  pronounced  several  ways  depending 
upon  the  geographical  area  of  the  world  in  which  the  word  is 
being  used.  Therefore,  it  is  possible  for  the  transcriptor 
to  write  6i  when  he  really  should  have  written  cfa . 

C.   SOURCES  AND  OSES 

The  transcriptions  used  for  this  paper  wera  obtained 
from  a  variety  of  sources.  Most  of  the  test  text  portions 
were  taken  from  "The  Principles  of  the  International 
Phonetic  Association,  1949."  There  is  a  second  group  of 
text  particularly  done  in  a  conversational  mode  type 
obtained  from  Micholin  Ponder  of  the  Research  Department  of 
the  Defense  Language  Institute,  Monterey,  California. 
Additional  samples  of  conversational  text  was  made  available 
by  Dr.  R.  Hohlford,  and  particularly  useful  English  samples 
were  taken  from  "Informal  Speech"  [Ref.  8].  A  sample  of 
Spanish  was  contributed  by  Dr.  Maria  Baird,  Chairman, 
Spanish  Department,  DLI,  Monterey,  Ca. 

There  are  also  several  dictionaries  which  use  the  IPA 
symbols  for  their  pronunciation  guides.  One  such  source  for 
American  English  is  "A  Pronouncing  Dictionary  of  American 
English,"  by  Kenyon  and  Kott  [Ref.  9].  Several  foreign 
dictionaries  were  scanned  as  well  as  language  textbooks,  in 
most  cases  the  IPA  was  used  sparingly,  making  it  extremely 
difficult  to  collect  a  satisfactory  representation. 
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IV.   DIFFERENTIATION  DEVELOPMENT 

The  actual  classification  of  specific  sounds  has 
historically  been  achieved  first  by  aural  perception,  and 
later  by  electronics  devices  such  as  the  oscilloscope,  the 
spectrograph,  and  the  computer.  All  of  these  devices 
required  manual  intervention.  That  is,  the  sounds  are 
processed  and  recorded  so  that  they  can  be  tangibly  observed 
and  interpreted  for  content,  classification,  etc.  Presently 
no  real  time  conversion  exists  for  the 
interpretation/classification  domain.  Developing  a  routine 
or  algorithm  to  directly  convert  spoken  speech  into  some 
form  of  usable  data  does  not  appear  infeasible.  There  are 
currently  research  projects  being  conducted  in  this  area. 
Hess  [Bef.  10],  although  not  specifically  oriented  to 
language  differentiation  developed  a  recognition  model  whose 
techniques  and  results  may  in  fact  be  very  applicable  to  a 
real  time  classification  converter.  For  the  purposes  of 
this  research  it  was  assumed  that  such  a  device  could  be 
produced. 

Although  it  is  not  clearly  understood  how  the  mind  can 
differentiate  languages,  it  seemed  that  a  model  could  be 
developed  to  produce  this  differentiation  function,  not  on  a 
"guess"  basis  but  with  some  reasonable  assurance  as  to  which 
language  was  being  used.  Here,  it  was  felt  that  the  sound 
content  might  be  the  key.  The  research  is  based  on  these 
assumptions  and  the  belief  that  the  IPA  represents  an 
appropriate  sound  classification  capturing  vehicle. 

A.   DATA  EASE  SELECTION 

The  first  problem  was  to  determine  a  satisfactory  data 
base  from  which  one  could  establish  the  categorical  sound 
statistics.  Considerable  research  has  been  done  on 
frequency  factors  for  use  of  words  under  such  conditions  as: 
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ordinary  (informal)  conversation,  formal  speaking  (addresses 
etc.),  informal  writing  (letters),  and  formal  writing 
(textbooks,  newspapers,  periodicals,  etc.) ,  and  these  lists 
are  available  in  a  number  of  languages.  After  obtaining 
such  lists  it  became  necessary  to  convert  first  into  the 
Roman  alphabet,  and  then  to  transcribe  from  the  Romanized 
script  into  the  IPA  symbology.  As  discussed  above  in  the 
transcription  section,  this  did  not  propose  an  easy  task  for 
a  non-native  novice  transcriptor.  Therefore,  solicitations 
for  assistance  particularly  from  DLI,  were  abundant  [refs. 
11,  12].  The  question  arose  concerning  the  possibility  of 
error  introduction  when  using  word  lists.  The  major  error 
would  seem  to  appear  when  the  factor  of  frequency  is  not 
utilized  within  the  list  itself,  i.e.,  if  the  frequency  of 
the  word  were  1/10  then  one  would  expect  every  tenth  word  in 
the  list  to  be  the  same.  A  further  example  is  drawn  from 
the  Markov  process.  One  such  use  of  the  Markov  process  is 
to  establish  the  frequency  of  occurrence  of  letters 
(singularly  and  in  combination)  for  the  given  language. 
Then  a  string  is  developed  using  those  frequencies  (note 
that  in  English  one  considers  27  characters  to  include  the 
pause) .   A  typical  string  would  appear  as: 

EAMI  HEI3RAGEL etc. 

The  frequency  of   use   is   a   must   in   this  case,   and   is 
generally  determined  by:   (for  the  single  letter  case) 

Frequency  (desired  letter)  =    (desired  letter)       (1) 


e^Ters] 

Obviously  the  string  of  characters  does  not  make  sense. 
However,  when  one  looks  at  the  strings  generated  by  the  two 
letter  combinations  [of  which  there  are  (27) 2  or  (n)2],  they 
may  find  some  words  (simple)  begin  to  appear.  Using  the 
three  letter  combination  level   (n) 3   more   words   begin   to 
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appear.  The  process  could  of  course  continue  ad  infinitum 
and  at  each  step  would  generate  more  complex  words  and 
perhaps  even  paragraphs.  An  analysis  very  similiar  to  the 
Markov  Chain  type,  just  described,  was  used  by  Rau  [Ref. 
13],  to  develop  a  process  by  which  short  samples  of  written 
text  could  be  automatically  differentiated.  Rau  looked  at 
two  languages,  and  achieved  results,  ranging  from  51%  to 
100%  accuracy  factors  which  were  proportional  to  the  length 
of  the  "short  samples"  he  used  [Ref,  13,  p.  21,  ff  ].  In  the 
case  of  word  lists,  it  would  appear  that  by  not  at  least 
using  a  Markcv  process  something  would  be  lost.  However,  in 
the  early  testing,  the  single  listings  of  words  generated 
data  very  close  to  that  of  various  random  text  and 
conversation  inputs.  Therefore,  it  was  concluded  that  a 
significant  error  was  not  introduced  by  using  the  most 
common  words  independent  of  their  frequency  factor. 

B.   COMPUTER  LANGUAGE  DECISION 

It  was  apparent  that  data  processing  should  be 
accomplished  by  a  computer  but  the  choice  of  a  language 
(compiler)  was  not  immediately  obvious.  FORTRAN  IV  was 
attempted,  but  rejected  because  of  the  conversions  required 
in  the  input/output  (I/O)  for  the  raw  data.  The  language 
SNOBOL  IV  (used  in  conjuction  with  SPITBOL)  is  probably  the 
best  language  [Ref.  14],  however,  arrangements  for  its 
installation  could  not  be  achieved  in  time  to  be  effective 
for  this  research.  ALGOL  W  contains  qualities  of  both 
FORTRAN  and  COBOL,  and  was  ultimately  selected  because  of 
its  inherent  ability  to  process  both  text  and  equations. 
The  initial  program  was  developed  by  M.  C.  Thomas[ Ref  15], 
using  strictly  English  data,  and  a  special  alphabet 
conversion  code  (ROMI)  consisting  of  the  44  IPA  sounds 
associated  with  the  English  languages.  The  program 
developed  the  statistics  for  the  first  sound,  the  first  two 
sounds,  first  three  sounds,  and  the  first  four  sounds  of  the 
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data  input.  The  statistics  were  developed  in  the  program  by 
reading  in  the  data  word  by  word,  then  converting  the  data 
into  the  sound  categories  (F,N,S,V),  via  ROMI,  letter  by 
letter.  The  converted  words  were  processed  to  extract  the 
appropriate  statistics  to  produce  the  data  shown  in  computer 
output  1. 

As  languages  outside  of  English  were  drawn  into  the  data 
base,  POMI  had  to  be  increased,  and  was  ultimately  expanded 
to  its  present  state  of  101  characters.  The  number  of 
symbols  (101)  decided  upon  was  not  entirely  the  result  of 
the  different  languages  introduced  or  tested,  rather  the 
number  was  selected  as  being  the  universal  set  recognized  by 
the  International  Phonetic  Association  [Ref.  5],  plus  some 
diphthongs  uniguely  identified  by  Cartier  and  Todaro  [Ref. 
6].  Thus  BOMI  is  capable  of  converting  any  language 
subjected  to  the  models.  The  ROMI  to  IPA  conversion  is 
listed  by  categories  in  the  appendix  C  tables. 

Five  languages  were  selected  at  random  from  among  those 
for  which  frequency  tables  and  translators  or  previously 
transcripted  materials  were  available.  Theoretically  the 
languages  are  independent  variables  to  any  algorithym  and 
thus  were  designated  A,  B,  C,  D,  and  E. 

C.   FIRST  SOUND  ANALYSIS 

Results  similiar  to  the  first  data  run  are  shown  in 
computer  output  1.  The  sound  pattern  of  the  first  letter 
per  word  (or  phrase,  in  the  conversational  cases)  showed 
some  promise  of  a  pattern,  even  though  they  were  bunched 
together  at  the  lower  end  of  the  scale  (see  figure  1) .  The 
words  were  separated  from  the  phrases  to  prove  (or  disprove) 
similarity,  and  similarity  did  occur,  thus  disproving  that 
an  error  factor  was  introduced  because  of  using  word  lists 
without  frequency  considerations. 
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A  decision  table  was  drawn  up  using  ranges  established 
by  figures  1-a  and  1-b.  A  new  set  of  data  for  a  single 
language  was  then  analyzed  and  its  results  compared  with  the 
table.   The  test  data  is  indicated  by  the  X's  in  figure  2. 

The  results  of  the  single  test  indicated  that  the  sample 
size  was  inadequate.  Additionally,  it  appeared  that  the 
ranges  would  increase  proportionately  with  the  sample  size, 
unless  a  convergence  could  be  determined.  If  the  ranges 
were  to  increase,  there  would  be  an  even  greater  overlapping 
of  regions,  and  decisions  would  be  made  more  difficult. 
Therefore  it  was  concluded  that  differentiation  was  not 
feasible  on  the  basis  of  a  single  sound. 
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Figure  1.   First  Sound  Frequencies 
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Figure  2.   First  Sound  Decision  Table 
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D.   NORMALIZATION  CROSS-SECTION 

The  second  approach  dealt  with  observing  a  cross-section 
of  the  languages  collectively  on  the  basis  of  categorical 
content.  This  method  of  analysis  presumed  that  the  sounds 
would  be  randomly  distributed  in  a  "Gaussian"  fashion.  The 
decision  factor  selected  was  the  Shannon  Theorem  [Ref.  16, 
chapter  3].  In  the  Shannon  theorem  the  data  is  assumed 
Gaussian,  and  three  situations  occur:  (1)  the  curves  are 
disjoint  and  the  decision  is  immediately  obvious;  (2)  the 
curves  totally  overlap  and  no  decision  is  possible;  or  (3) 
there  is  a  slight  overlapping  and  some  criterion  can  be 
developed  which  will  give  reasonable  predictions  of  the  case 
at  hand,  providing  the  error  factor  (amount  of  overlap)  is 
not  severe.   The  three  situations  are: 


f  (x) 


f  (X) 


f  (X) 


case  (1) 


case  (2) 


case  (3) 


Figure  3.   Shannon  Theorem  Decision  Curves 

It  was  anticipated  that  either  case  (1)  or  (3)  would 
emerge.  Therefore,  the  statistics  obtained  from  the 
computer  printout  were  "normalized"  or  "Gaussianized"  in 
accordance  with  the  following: 
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X  =  the  %   of  occurrence  of  a  category 
in  the  first  three  and  last  two 
sound  positions  of  a  word.   %  =>  frequency. 


E(x 


)  «_2L# 


(2) 


<ru)  =  r  -JLa_z  sjpsijj I1/2 


(3) 


f(x)  = 


1       exp  j  -  f    X  -  E(x)    1 


(<*) 


i  -  1,  d,2)#  (1,2,3)  ,  (n-1),  (n). 


In  the  case  of  the  fricatives  for  language  "A"  the 
content  (from  computer  output  1)  was: 


X  = 


sound  location 


1 

2 
3 

4 

n-1 
n 


Random  Variable 
frequency  of 
occurrence  of  F 


00.98 
17.  46 


15.46 
01.35 


The   computed   mean  is: 
E(x)    =  33.48  +     0.98    +17.46    ♦    15.46    +    1.35      

=    13.75 

Similarily  the  standard  deviation  was  calculated  to  be 
<r(x)  =  10.22 
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Then  using  table  6.1  [Ref.  17]  the  Gaussian  density  (pdf) 
for  fricatives  was  established  for  language  A.  Using 
identical  procedures  the  fricative  densities  were  created 
for  the  remaining  four  languages  and  superimposed  on  the 
graph  for  language  A.  The  same  procedure  was  followed  to 
establish  graphs  in  each  category.  The  tables  and  graphs 
for  this  procedure  are  contained  in  appendix  D.  The  results 
were  clearly  not  what  was  expected.  In  fact.  Shannons  case 
(2)  is  approached  in  each  graph.  Even  in  the  graphs  where 
case  (3)  was  there,  in  spirit,  the  error  factor  is  clearly 
greater  than  the  Shannon  theorem  could  accept.  It  was 
speculated  that  increasing  the  reference  data  would  not  be 
sufficient  to  obtain  more  dispersion  in  the  graphs. 
Therefore,  this  technigue  was  abandoned. 

E.   TWO- SOOND  PROBABILITIES 

The  computer  program  which  develops  the  statistics 
creates  them  such  that  the  frequency  information  follows  the 
tree  branch  technigue,  as  shown  in  figure  4. 

The  frequencies  registered  at  each  point  in  the  tree  is 
an  exact  probability.  Therefore  at  every  sound  level  for 
each  language  the  probability  per  language  is  available. 
These  probabilities  are  grouped  by  language  in  computer 
output  1,  and  are  summarized  in  table  D-I,  in  appendix  D. 
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Figure  4.  The  Frequency  Tree. 

Assuming  that  all  languages  are  equiprobable 
[P(A)  =P  (B)=P  (C)=P(D)  =P(E)  =1/5],  liklihood  ratios  can  be 
developed  using  Eayes  rule;  which  computes  the  probability 
of  a  given  language  based  on  the  categorical  sound  occurring 
at  a  specified  position  in  the  word.  For  example  the 
probability  of  a  test  word  being  from  language  "X"  given 
that  a  sound  category  was  identified  in  position  two  (second 
sound)  would  be  computed  as  follows: 


P(X|I2)  = 


where: 


(5) 


P(Y2  IX)  pm 

p(y2ia)P(a/  iM*rn3T7W~" 

X  =  language  =  A,  B,  C,  D,  E 

Y2-  sound  category  =  F,  Nr  S,  7 

i  =  position  indicator  =  1,  2,    3,  4,  n-1,  n 
j  =  position  indicator  =  1 ,  2,  3,  4,  n-1,  n 


These  probabilities  are  tabulated  in  table  IV-I.  A  decision 
can  be  achieved  using  the  maximum  likelihood.  For  example, 
from  table  IV-I,  for  an  "S"  in  the  2nd  position  one  would 
choose  language  E  because  it  clearly  has   the   the   greatest 
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probability  of  being  the  correct  choice.  In  the  case  where 
more  than  one  word  from  the  same  language  is  being  analyzed 
the  decision  criteria  reguires  an  additional  iteration;  this 
presumes  the  words  have  different  sound  content  arrangements 
(order) .  When  the  position  is  selected  (say  at  the  second 
sound  position)  the  rows  are  removed  in  tact.  The  removed 
rows  are  then  isolated  and  a  product  is  calculated  for  the 
column  elements.  The  correct  choice  is  then  the  columnar 
product  which  is  largest,  i.e.,  has  the  greatest  likelihood. 
Multiplication  corresponds  to  the  assumption  that  words  are 
chosen  independently  at  random  from  the  language.  For 
example,  given  a  first  word  has  a  "V"  in  the  last  position 
the  maximum  likelihood  would  elect  language  B,  however,  if 
the  second  word  had  an  "S"  in  the  last  position  and  the 
product  is  taken,  language  D  will  have  the  maximum 
likelihood. 


V  .074  .313  .229  .126  .258 

S  .220  .000  .137  .491  .153 

product  .016  .000  .031  .062  .039 

sum  .294  .313  .466  .617  .411 


Using  the  product  method,  clearly  eliminates  any 
language  which  is  devoid  of  a  unique  sound.  The  advantage 
of  the  summing  method  is  that  languages  which  have  high 
percentage  of  occurrence  are  brought  out  for  consideration 
in  spite  of  a  categorical  void.  Arguments  can  be 
established  on  which  is  the  better  method  (sum  or  product) , 
however,  it  was  decided  to  use  the  product  method  in 
subsequent  decisions.  The  product  of  one  or  more  column 
elements  is  referred  to  as  "validity  factors"  in  computer 
program  2;  a  product  of  validity  factors  are  called 
"validity  products." 
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In  spite  of  the  closing  statement  in  section  IV-C,  that 
differentiation  was  not  feasible  on  the  basis  of  a  single 
sound,  testing  was  performed  on  some  200  random 
words/phrases.  The  results  (not  included)  were  ambiguous 
and  supported  the  earlier  claim. 

Bayes  Rule  still  offered  more  potential  than  previous 
efforts,  therefore,  the  two-sound  combinations  [of  which 
there  are  16;  F,  N#  S,  V  =>  (4) 2  ],  were  computed  in  the 
following  manner: 


PCXIYjY,  ) 

where: 

X 

Y 

(6) 


— ^rM  2  it  i  xjjFpn~r~ 

X-A.E 

■  language  =  A,B,C,D,E 

=  sound  category  =  F,N,S,V 

P(X)  =  P(A)=P(B)=P(C)=P(D)=P(E), 

by  assumption 

These  values  are  given  in  Table  IV-II. 


The  decision  rule  is  identical  to  that  for  one-sound, 
i.e.,  maximum  likelihood.  Given  any  word(s)  greater  than 
one  sound,  a  decision  can  be  reached.  Again  two  or  more 
words  dictate  the  product  (or  sum)  rule  to  obtain  the 
maximum  likelihood. 

The  results  of  limited  testing  (30  words)  using  this 
method  were  telow  the  desirable  limit.  In  the  case  of  one 
random  wcrd,  decisions  were  less  than  20%  correct;  for  two 
words  less  than  50%  correct;  and  three  word  decisions  ranged 
from  45-55%  correct.  Though  the  correct  decisions  were 
proportional  to  the  number  of  words,  the  decision  procedure 
appeared  to  be  weak.  Presuming  this  was  a  result  of  the 
earlier  assumption  that  all  languages  were  eguiprobable,  a 
procedure  similiar  to  Bayes  was  constructed  and  defined  as 
follows: 
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X=A,E 

where:  X   =  A,B,C,D,E 
Y    =  F,N,S,V 


Again  the  assumption  of  equiprobable  languages  was  inserted 
thus  removing  the  [P(X)  ]2  terms.  The  remaining  equation  is 
hereby  defined  as  "Prognostic  Progression."  The  equation 
calculates  the  "Logical  Prognosis"  of  a  language  given  the 
frequency  of  occurrence  at  a  position  and  the  probability 
[or  Logical  Prognosis  (L)  ]  brought  forward  from  the  previous 
position  in  the  tree  (fig.  4)  .  Table  IV-III  was  calculated 
using  this  procedure,  and  is  compared  with  the  Bayes 
solutions  in  Table  IV-IV.  The  results  are  interesting. 
They  show  that  the  resultants  are  shifted,  from  one  table  to 
the  next,  and  tend  to  negate  the  assumption  of  language 
equiprobability.  Thus  the  probability  of  language  arrivals 
is  introduced,  but  indirectly,  at  any  selected  level  except 
the  first  (single  sound) .  This  enables  the  use  of  variable 
probability  for  reference  languages,  i.e.,  unknown 
reference  sample  sizes  are  inherently  accounted  for.  Three 
comparative  tests  were  run  for  Tables  IV-III  versus  IV-II 
using  100  randomly  selected  words  (20  per  language) .  The 
results  showed  for  the  two-sound  level  that  the  formulas  had 
relatively  the  same  effect.  The  overall  results  achieved 
were:  (note,  100  word  samples  increased  minimum  correct  for 
this  test   to  40%  compared  to  previous  20%) 


%    CORRECT 

Procedure  test  1     test  2  test  3 

BAYES  39         40  38 

COOKS  41         39  40 
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Further  test  at  the  three-sound  level  were  conducted; 
results  very  similiar  to  the  two-sound  results  were 
obtained.  The  number  of  correct  choices  were  within  1 — 4% 
of  each  other,  however,  it  was  noted  that  in  4  of  7  tests 
(avg.  words  =  35)  the  magnitude  of  the  correct  over  the  next 
competitor  was  much  greater  with  Cooks  method. 
Additionally,  the  order  of  magnitude  from  the  most  likely 
(maximum  product)  to  the  second  most  likely,  second  to 
third,  etc.,  was  much  more  even,  and  smaller  in  Bayes  than 
in  Cooks.  It  was  thus  assumed  that  the  idea  of  "Prognostic 
Progression"  was  at  least  equivalent  to  Bayes  Rule.  This 
assumption  encouraged  the  writing  of  computer  program  number 
2. 

The  basic  operation  of  computer  program  2  is  a 
continuation  of  program  1,  except  that  some  extra  features 
were  added.  The  primary  extra  feature  is  variable 
partitioning,  wherein  words  of  the  same  sound  length  are 
analyzed  collectively  by  language.  The  partitioning  is 
variable  in  that  the  statistics  can  be  ended  at  any  point, 
i.e.,  all  words  >1,  create  the  same  data  as  in  computer 
output  1;  words  >2,  creates  data  for  one  sounded  words, 
apart  from  the  data  for  words  of  two  sounds  and  greater; 
this  process  is  allowed  through  words  >6.  The  decision 
portion  forces  a  word  to  follow  a  flow  path  based  on  the 
number  of  sounds  the  word  contains.  By  doing  this,  for 
example,  three  sounded  words  are  only  compared  with  all 
other  three  sounded  words  in  the  data  collection,  unless  the 
the  partitioning  is  set  at  >2  or  >3.  The  standard  test 
(comparisons)  in  the  flow  path  for  a  partitioning  of  >6 ,  is 
provided  in  table  IV-VII,  and  the  program  flow  diagram  is 
provided  in  figure  5.  Secondary  features  include  selectable 
graphic  representations  of  either  the  raw  statistics,  or  the 
Prognostic  Progression  values  for  any  or  all  reference  data. 
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The  model  was  tested  using  randomly  selected  words  from 
each  language  within  the  data  base.  This  "loop"  test  was 
used  to  determine  if  the  model  could  correctly  segregate  and 
identify  what  it  already  held  in  storage. 

The  first-two  position  results  related  a  noticeable 
similariity  between  the  languages,  and  reguired  at  least  a 
two  word  sample  size  to  achieve  correct  decisions  in  50%  of 
the  tests.  The  results  of  this  test  are  tabulated  in  table 
IV-V.  Tests  involving  the  first-three  sounds  showed  even 
greater  improvement  in  the  results.  This  indicated  that  at 
the  three-sound  level  unique  patterns  were  emerging.  The 
test  of  three-sounds  duplicated  the  procedure  used  for  the 
two-sounds  and  their  results  are  tabulated  in  table  IV-VI. 

Testing  beyond  this  point  was  considered  insignificant 
due  to  the  limited  reference  data.  Beyond  three-sounds,  the 
tests  were  approaching  100%  for  as  few  as  five  word/phrase 
test  samples.  The  consensus  was  that  even  though  patterns 
were  uniquely  developing,  their  percentage  relative  to  the 
whole  of  a  language  negated  the  significance  of  the 
patterns. 

A  final  group  of  tests  was  run  with  the  program  changed 
to  use  Bayes'  Rule,  rather  than  the  Prognostic  Progression. 
The  results  (not  included)  were  for  all  practical  purposes 
identical.  The  Bayes/Rule  method  also  forced  100%  correct 
decisions  as  early  as  five  words.  On  the  basis  of  this  test 
it  is  concluded  that  Bayes'  Rule  and  Cooks  Prognostic 
Progression  perform  equally  on  this  type  of  task. 
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Table  IV-I. 
Ba yes' Theorem  Calculations   for   one-sound 


Ti 

P  (A  1 1,  ) 

P(B|Ij  ) 

P(CH,  ) 

P(D|Yi  ) 

P(E|Yj  ) 

F1 

.237 

.204 

.  142 

.179 

.235 

Ni 

.179 

.181 

.223 

.260 

.157 

Si 

.281 

.167 

.185 

.140 

.227 

v, 

.084 

.250 

.266 

.252 

.148 

*2 

.035 

.161 

.374 

.169 

.261 

N2 

.070 

.350 

.234 

.148 

.200 

S2 

.111 

.029 

.185 

.269 

.405 

h 

.270 

.173 

.169 

.236 

.153 

h 

.230 

.129 

.224 

.254 

.162 

h 

.284 

.160 

.197 

.202 

.157 

S3 

.078 

.300 

.208 

.130 

.383 

v3 

.174 

.215 

.  187 

.212 

.212 

F4 

.041 

.186 

.217 

.302 

.253 

»4 

.  146 

.26  3 

.213 

.096 

.283 

S4 

.499 

.083 

.  131 

.140 

.148 

v4 

.130 

.231 

.223 

.252 

.163 

Fn-1 

.022 

.396 

.151 

.214 

.216 

Nn-i 

.144 

.169 

.296 

.154 

.237 

Sn-1 

.051 

.328 

.162 

.179 

.280 

Vn-1 

.358 

.098 

.  178 

.233 

.134 

Fn 

.293 

.138 

.067 

.297 

.205 

N„ 

.396 

.102 

.226 

.194 

.096 

Sn 

.220 

.000 

.137 

.491 

.153 

Vn 

.074 

.313 

.229 

.126 

.258 
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Table  IV-II. 


Bayes'  Theorem  Calculations 
for  two-sounds 


*l*l 

P(A|Yi  Yj  ) 

PfBlYj  Yj  )     P(C|Yj   Yj  ) 

P(D|Yj  Yj 

)     P(E|Yi  Yj) 

ii  F2 

.000 

.000 

.000 

.000 

1.0 

Pi  N2 

.037 

.388 

.  154 

.068 

.353 

F,  S2 

.28  2 

-000 

.000 

.137 

.581 

F,  V2 

.303 

.199 

.188 

.190 

.120 

N,  F2 

.000 

.000 

.000 

.000 

.000 

N,  N2 

.000 

.161 

.400 

.000 

.438 

N,  S2 

.000 

.000 

1.0 

.000 

.000 

N,  V2 

.200 

.163 

.179 

.328 

.130 

Si  F2 

.192 

.000 

.000 

.351 

.457 

S,  N2 

.062 

.324 

.243 

.151 

.221 

Si  s2 

.000 

.000 

.000 

.000 

1.0 

Si  v2 

.298 

.192 

.154 

.141 

>    .216 

Vi   F2 

.000 

.334 

.443 

.125 

.098 

Vi  N2 

.119 

.276 

.285 

.246 

.075 

v,  s2 

.044 

.052 

.403 

.081 

.420 

v,  v2 

.188 

.109 

.097 

.570 

.037 
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Table  IV-III. 

Cooks  Prognostic  Progression  Calculations 
for  two-sounds 


*i  II 

L(A|Yj  Yj  ) 

L(B|Yi  Yj 

)     MCIY;  Yj  ) 

MDIY;    Y 

j)     L(S|Yi 

V 

P,  F2 

.000 

.000 

.000 

.000 

1.0 

F,  N2 

.045 

.359 

.114 

.062 

.421 

P,  s2 

.293 

.000 

.000 

.108 

.599 

P,  V2 

.363 

.184 

.138 

.172 

.142 

»1  F2 

.000 

.000 

.000 

.000 

.000 

Ni  N2 

.000 

.144 

.483 

.000 

.372 

N,  S2 

.00  0 

.000 

1.0 

.000 

.000 

Ht  V2 

.171 

.130 

.192 

.409 

.098 

S|  F2 

.253 

.000 

.000 

.231 

.516 

S,  Nj- 

.085 

.334 

.219 

.103 

.260 

S1   S2 

.000 

.000 

.000 

.000 

1.0 

Si  v2 

.373 

.181 

.126 

.088 

.232 

7,  F2 

.000 

.325 

.486 

.130 

.060 

V,  N2 

.045 

.290 

.339 

.276 

.050 

V,  S2 

.018 

.059 

.521 

.099 

.302 

Vi  v2 

.073 

.118 

.119 

.664 

.026 
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Table  IV-IV. 


Shifting  Effects  Denoted 
by  the  Difference  in  (V-III)  -  (V-II) 


A 

B 

C 

D 

E 

FF 

.000 

•  000 

.000 

.000 

.000 

FN 

.008 

.029(-) 

.040(-) 

.006 (-) 

.068 

FS 

.011 

.000 

.000 

.029(-) 

.018 

FV 

.060 

-015(-) 

.050(-) 

.018(-) 

.022 

NF 

.000 

.000 

-000 

.000 

.000 

NN 

.000 

.017(-) 

.083 

.000 

.066  (-) 

NS 

.000 

.000 

.000 

.000 

.000 

NV 

.029  (-) 

.033  (-) 

.013 

.081 

.032(-) 

SF 

.061 

.000 

-000 

.120(-) 

.059 

SN 

.023 

.010 

-024  (-) 

.048  (-) 

.039 

ss 

.000 

.000 

.000 

.000 

.000 

sv 

.07  5 

-011  (-) 

-028(-) 

.053  (-) 

.016 

VF 
7N 

.000 
.074(-) 

.009(j-) 
.014 

.043 
.054 

.005 
.030 

.038  (-) 
.025(-) 

VS 

.026  (-) 

.007 

.  118 

.018 

.113<-) 

VV 

.115<-) 

.009 

.022 

.094 

.011 
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Table  IV-V. 

Two-Sound  Results 
using  Prognostic  Progression 


ONq-WORD.  TEST: 


Sfflpl 

Lng  size 

A 

B 

C 

D 

E 

A    33 

.637 

.121 

.000 

.  182 

.061 

B    25 

.240 

.400 

.08 

.120 

.016 

C    49 

.367 

.204 

.163 

.265 

.000 

D    42 

.286 

.143 

.000 

.571 

.000 

E    60 

.317 

.050 

.150 

.150 

.333 

TWO-WORD    TEST: 


Sfflpl 

Lng  size 

A 

B 

C 

D 

E 

A    16 

.563 

.125 

.000 

.313 

.000 

B    12 

.083 

.583 

.083 

.083 

.  167 

C    24 

.167 

.292 

.2  08 

.330 

.000 

D    21 

.238 

.095 

.000 

.667 

.000 

E    30 

.133 

.067 

.133 

.167 

.500 

Average  correct  single  word  =  83/209  =  .397 

Average  correct  two  words  =  50/90  =  .556 

Sample  sizes  of  15  and  greater  gave  results  of  100%  correct 

selection  in  4  of  5  tests. 
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Table  IV-VI. 

Three-Sound  Results 
using  Prognostic  Progression 


ONE-WORD  TEST: 


smpl 

Lng  size 

A 

B 

C 

D 

E 

A    33 

.667 

.033 

.100 

.233 

.067 

B    25 

.160 

.480 

.160 

.160 

.040 

C    49 

.306 

.041 

.327 

.265 

.061 

D    42 

.214 

.071 

.048 

.595 

.071 

E    60 

.217 

.083 

.133 

.167 

.400 

TWO-WORD_TEST; 

smpl 
Lng  size  A 


B 


A 

16 

.688 

.000 

.000 

.313 

.000 

B 

12 

.083 

.580 

.167 

.167 

.000 

C 

24 

.167 

.042 

.500 

.292 

.000 

D 

21 

.095 

.048 

.048 

.810 

.000 

E 

30 

.100 

.067 

.100 

.167 

.567 

Average  correct  single  word  =  97/209  =  .464 

Average  correct  two  words  =  64/103  =  .621 

Sample  sizes  of  11  and  greater  gave  results  of  100%  correct 

selection  in  all  tests. 
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Table  IV- VII. 

Hodel  Test  Path 

for 

A  Given  Word  Length 


word 
length 


Test  Criterion 


1. 

2. 
3. 

4. 
5. 

6. 


P(x) 

P(x),  My,  Y2 

P(x),  L(y,  y2 

P(x),  L(y,  y2 

P(x)  ,  L(y,  y2 

L(yt  y2y3y4y5 

P(x),   L(y,  y2 

l  (y,  y2  y3  y4  y5 


x) 

x)  ,  My,  y2  y3  |x) 

x)  ,  L  (y,  y2  y3  |  x)  ,    L  (y,  y2  y3  y4  |  x) 

x)  ,  L  (yt  y2  y3  |x)  ,    L  (y,  y2  y3  y4  |  x)  , 

x) 

x)  r  L(yty2y3|x),    My,  y2  y3  y4  I  x)  , 

x)#  L(y5y6  i*) '  My,  y2  y5y6  ,x)  * 


L(y,  y5|x)  ,   My,  y2y3y4y5y6  |x) 


where:   x  =  language  =  A,B,C,D,E 

y  =  sound  category  =  F,N,S,V 

1  =  first  sound 

2  =  second  sound 

3  =  third  sound 

4  =  fourth  sound 

5  =  last  sound  =  n 

6  =  next  to  last  sound  =  n-1 
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Figure  5.  Final  Model  Flow  Diagram 
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V.  RECOMMENDATIONS  FOR  FUTURE  STUDIES 

1.  The  model  finally  developed  has  considerable 
potential  which  was  not  exhaustively  exploited  herein.  The 
reference  data  should  be  vastly  expanded,  or  at  least 
altered  to  reflect  the  most  current  language/vocabularies  in 
use.  1000-1500  words  and/or  phrases  per  language  is 
suggested,  because  only  20%  of  that  range  was  used  here,  and 
it  appeared  that  word  unigueness  was  overshadowing  language 
uniqueness. 

2.  The  Prognostic  Progression  formula  (no.  7)  should  be 
tested  at  greater  lengths  to  identify  its  uniqueness,  or 
qualify  it  as  an  extension  of  Bayes  Theorem. 

3.  The  largest  problem  encountered  was  in  not  having  a 
spoken  speech  to  phoneme  converter.  Assuming  a  similiar 
lack  of  availability  for  future  researchers,  it  is 
recommended  that  high  quality  transcriptions  be  obtained 
earlyon,  and  the  quantity  of  transcripted  words  be  used  as  a 
criterion  for  continuance.  Further  phrase  transcriptions 
will  provide  better  results  than  word  lists. 

4.  Diacritical  marks  and  emphasis  were  not  considered 
herein,  but  may  prove  beneficial  in  further  language 
differentiation  developments. 
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VI.    CONCLUSION 

The  following  are  presented  in  relation  to  the  findings 
herein: 

1.  The  IPA  does  appear  to  be  an  able  vehicle  to  support 
a  language  differentiation  scheme.  However,  the  ROMI 
conversion  alphabet  should  have  been  expanded  to  reflect 
diacritical  marks  across  the  languages  used. 

2.  Single  sounds  are  definitely  an  inadeguate 
differentiation  approach.  Two-sound  combinations  present 
only  borderline  results.  At  the  three-sound  point  definite 
uniqueness  appears,  and  is  improved  with  each  additional 
sound  brought  into  the  combinations.  The  ending  sounds 
(backdoor  approach)  begin  to  present  patterns  of  interest  at 
the  two-sound  point,  and  should  have  been  explored  at 
greater  length.  For  the  languages  used  herein  (all 
European)  it  is  generally  concluded  that  patterns  emerged 
which  were  unique  in  spite  of  the  limited  sample  size. 

3.  The  final  analysis  and  decision  model  (computer 
program  2)  is  considered  a  successful  tool  for  language 
differentiation.  It  appears  to  have  considerable  potential 
for  expanded  analysis. 

4.  Perhaps  the  most  important,  though  unexpected,  result 
was  obtained  via  the  "loopback"  testing  of  the  model.  This 
test  pointed  out  the  model  was  capable  of  pattern  matching 
decisions  of  high  reliability  with  small  test  samples  (<5) . 
This  certainly  presents  an  improvement  to  the  technique  of 
word  matching,  in  that  storage  requirements  and  accessing 
times  are  greatly  reduced.  This  potential  is  limited  only 
by  the  ability  to  update  the  data  base  relative  to  current 
desired  operability. 
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APPENDIX  A 


THE  SPEECH  SYSTEM 


When  discussing  the  speech  system,  it  is  quite  possible 
to  delve  into  many  scientific  fields  of  endeavour  in  order 
to  fully  exploit  the  interaction  and  functions  of  the 
components.  In  an  overview  the  players  in  a  system  diagram 
analysis  (figure  1)  are  the  transmitting  section  and  the 
receiving  section. 


TRANSMITTER 


RECEIVER 


Figure   A-1.      Block   Diagram  of   the   Speech  System 
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The  receiving  section  is  comprised  of  the  hearing 
organ,  the  brainr  and  the  responders.  A  schematic  of  the 
hearing  system  (figure  2)  shows  a  subdivision  into  (1)  the 
outer  ear,  (2)  the  middle  ear,  and  (3)  the  inner  ear. 


Fie.  75. — Semidiagrammatic  Section  through  the  Right  Ear  (Czermak):  G,  external 
auditory  meatus;  T,  membrana  tympani;  P,  tympanic  cavity;  o,  fenestra  ovalis; 

R,    FENESTRA    ROTUNDA;     B,    SEMICIRCULAR    CANAL;    S,    COCHLEA;   Vt,    SCALA    VESTlBULr; 
PT,    SCALA    TYMPANI;    E,    EUSTACHIAN    TUBE;    R,    PINNA. 


Figure  A-2.   The  Hearing  System 
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The  outer  ear  functions  as  an  antenna,  and  both  ears  used 
together  comprise  a  directional  antenna  system  i.e.,  capable 
of  determining  the  direction  of  the  sound  source  relative  to 
the  listener.  The  outer  ear  also  contains  the  feed  system 
to  the  receiver.  The  middle  and  inner  ear  comprise  the 
receiver  itself.  The  middle  ear  senses  the  presence  of 
sound  and  passes  the  mechanical  energy  to  the  inner  ear, 
where  it  is  converted  to  electrical  impulses  modulated  in 
both  amplitude  and  frequency.  These  impulses  are  then  sent 
to  the  brain  which  detects  the  intelligence,  and  activates 
decision  circuits  to  provide  physical  response  as  necessary. 
The  Eustachian)  tube  (E  in  figure  2)  insures  that  there  is 
equal  pressure  on  both-  sides  of  the  membrana  tympani 
(eardrum) .  The  Eustachian  tubes  also  provide  some 
side-tonal  pressures  whenever  speech  or  sound  is  generated 
at  its  input  (upper  part  of  the  throat  behind  the  nasal 
cavity) .  This  side-tonal  effect  appears  to  provide  a 
negative  feedback  to  "pad"  or  reduce  the  effects  of  the 
amplitude  of  sound  waves  emitted  when  they  arrive  at  the 
receiver  input  of  the  "transceiver"  system.  An  analogy  to 
the  "TR/ATR"  action  in  a  radar  is  certainly  suggested  by  the 
side-tone  effect.  The  functions  of  the  receiving  mechanism 
are  those  for  which  a  mechanized  language  differentiation 
model  is  desired.  The  available  technology  does  not  dictate 
a  direct  approach  to  the  solution,  however,  the  basics  are 
clear  in  the  "blackbox"  approach.  The  output  is  a  response 
resulting  from  a  decision  based  on  the  input  received.  The 
type  of  decision  device,  must  then  be  determined  from  what 
information  can  be  gleaned  from  the  input.  The  input  is 
assumed  to  be  an  exact  duplication  of  the  output  from  the 
transmitter  section.  Therefore,  if  it  can  be  determined  how 
the  transmitter  functions  based  on  observable  output,  it 
seems  feasible  that  some  model  could  be  developed  to 
interpret  the  information  the  transmitter  would  'send 
subsequently. 
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The  transmitting  section  is  of  much  greater  interest 
and  value  to  this  research.  Basically,  as  seen  in  figure  1, 
the  brain  sends  responder  messages  to  the  lungs  and  vocal 
shaping  components.  The  lungs  provide  the  mechanical  energy 
which  is  shaped,  amplitude  and  frequency  modulated,  and 
emitted  as  speech  or  vocalization.  Thus  the  transmitter  is 
the  human  vocal  system.  A  block  diagram  of  the  system 
(figure  3)  gives  the  breakdown  of  the  vocal  system  into  four 
subdivisions.  The  schematic  diagram  (figure  4)  gives  the 
anatomical  layout  of  the  components. 
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fig.  A-3.a.   The  "Black-box"  Approach 
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fig.  A-3.b.   The  "Black-box"  Expansion 

Figure  A-3.   Human  Vocal  System 
(block  diagram) 
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Figure  A-4.       Human   Vocal   System 
(schematic   diagram) 
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The  lungs  act  as  a  power  supply,  collecting  air  such 
that  it  can  be  expelled  with  the  required  volume  and 
velocity  whenever  dictated  by  the  brain.  Both  the  voluntary 
and  involuntary  actions  by  the  lungs  are  used  in  the  speech 
process.  Voluntary  action  is  very  apparent  in  the  "raised" 
voice  or  "yelling"  process,  where  there  is  an  obvious 
increase  of  pressure  on  the  lungs  forcing  the  volume  and 
velocity  out  of  the  lungs  to  be  increased. 

The  oscillator  and  resonant  cavities  consist  of  the 
glottis  (vocal  chords) ,  the  pharyngeal  passage  (upper 
throat),  the  oral  cavity  (the  mouth),  and  the  nasal  passage. 
The  glottis,  when  excited  by  an  expulsion  of  air,  vibrates 
or  oscillates  at  a  fundamental  frequency  (male  average  is 
130Hz,  female  average  is  205Hz)  [  Ref .  18],  and  generates 
many  harmonics.  The  frequency  actually  emitted  may  be  the 
fundamental,  a  harmonic,  or  some  combination.  In  general, 
when  sounds  are  emitted  there  is  an  amplification  of  some 
parts  of  the  spectrum  and  suppression  of  others,  much  like 
the  characteristics  of  a  bandpass  filter,  i.e.,  selective 
transmission.  The  fundamental  frequency  is  a  result  of  a 
number  of  factors,  namely  the  size,  shape,  and  elasticity  of 
the  glottis,  the  circumference,  length,  and  shape  of  the 
trachea,  and  the  size  shape,  and  depth  of  the  oral  and  nasal 
cavities;  specifics  for  typical  dimensions  and  frequencies 
relative  to  these  paramenters  can  be  found  in  appendix  E. 
In  the  aggregate  these  factors  constitute  a  tuned  waveguide 
and/or  cavities  which  tend  to  alter  the  basic  frequency  of 
the  glottis  vibrations.  In  support  of  this,  consider  what 
occurs  when  the  velum  is  opened  (by  its  trapdoor  action)  to 
allow  air  to  flow  through  the  nasal  cavity;  the  volume  of 
the  system  is  increased  which  is  consistant  with  a  lower 
frequency  of  resonance  normally  attributed  to  the  nasalized 
tones. 
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The  pulse  shaper  provides  the  ultimate  control  of  power 
during  constant  output.  The  shapers  consist  of  the  tongue, 
teeth,  lips,  jaw,  and  palate.  The  shapers  affect  both  the 
frequency  and  amplitude  of  the  transmitted  waves  and  thus 
act  very  similiar  to  a  modulator  section  in  a  radio 
transmitter.  Frequency  variability  occurs  in  the  range 
available  from  the  fully  open  to  the  fully  closed  mouth,  and 
has  numerous  descrete  frequencies  in  between  these  extremes. 

The  antenna  or  radiating  system  consists  of  the  actual 
oral  and  nasal  orifices.  The  lips  and  jaw  both  work 
independently  and  together  in  the  shaping,  frequency, 
amplitude,  and  emission  operations.  The  parameters  of 
importance  in  the  output  are  again  frequency  and  amplitude. 
The  sound  wave  emitted  will  be  of  higher  frequency  when  the 
mouth  is  more  in  the  closed  position  than  open.  The  affects 
of  the  nasal  chamber  is  controlled  by  the  velum,  which 
determines  the  amount  of  air  (by  volume)  allowed  to  pass  in 
the  cavity.  The  nasal-oral  combinations  regulate  the  output 
frequency  by  combining  the  orifice  controls  of  the  velum  and 
the  tongue  position.  These  combination  sounds  occur  more 
frequently  in  languages  other  than  English. 


RECOGNITION  OF  SOUNDS 

Every  emission  via  the  vocal  system  falls  into 
categories  which  have  been  previously  developed  and 
quantized  in  varying  degrees.  Numerous  experiments  have 
been  conducted  particularly  in  the  speaker  recognition  area 
where  the  uniqueness  within  these  categories  are  further 
quantized  to  search  out  factors  which  are  undeniably  speaker 
dependent,  and  thus  provide  keys  to  recognition  algorithms. 
Doherty  [Ref.  19]  used  25  significant  factors  in  his  Long 
Term  Spectra  (LTS)  analysis  to  achieve  100%   recognition   (a 
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rarity  in  recognition  results)  for  a  sample  size  of  50. 
Doherty  did  not  provide  a  specific  breakdown  of  the  25 
factors  he  used,  however,  he  did  indicate  that  various 
combinations  of  frequency,  times,  nazalization,  pauses, 
stops,  and  fricatives  were  some  of  the  factors  used.  Others 
such  as  Young  [Ref.  20]  have  used  a  single  category  of  sound 
to  promote  recognition  schemes.  Young  looked  specifically 
at  nazalization  and  achieved  results  from  50%  to  97%  with  a 
sample  size  of  13.  The  categories  are  relative  then  to 
recognition  of  many  entities  in  speech.  Word/phrase 
boundaries  as  well  as  the  individual  components  and  sound 
patterns  can  be  identified  and  removed  for  analysis. 
Experimenters  make  every  effort  to  eliminate  odds  whenever 
possible,  therefore,  it  is  not  uncommon  to  find  that  when  a 
project  is  dedicated  to  a.  specific  area  of  sound  to  research 
that  test  segments  are  carefully  screened  to  be 
representative  of  the  specific  area.  Sounds  can  be 
classified  by  a  number  of  parameters  (time,  frequency,  form, 
etc.)  One  such  classification  technique  categorizes  sounds 
by  form,  i.e.,  by  the  way  they  are  generated. 


The  categories  of  concern  are:  the  vowels  (v) ,  the 
stops  (s) ,  the  nasals  (n) ,  the  fricatives  (f) ,  and  the 
pauses  (p) . 

The  vowel  sounds  are  that  group  which  flow  smoothly 
(uninterupted)  from  the  lungs  through  the  oral  orifice 
utilizing  the  whole  of  the  vocal  cavity,  with  minor 
adjustments  in  resonance  promoted  by  the  specific  location 
of  the  tongue.  Vowels  are  further  defined  according  to  the 
tongue  position  with  respect  to  the  oral  cavity  (mouth)  in 
general.  The  front  vowels  are  generated  whenever  the  tongue 
position  toward  the  front  of  the  mouth  is  the  major  factor; 
the  sounds  specific  to  this  location  are:  i(HF),  I  (LHF) , 
e(HHF),  £(LMF),   se(LF).   The  back  vowels  are:  u(HB),  0  (LHB)  , 
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O(MB),  o(HLB)  r  a  (LB).  The  central  vowels  are:  ^(MC)  ,  <f(MC)  , 
3 (MC)  ,  a(MC)  ,  a(LMC)  .  In  addition  to  the  distinctive  vowels 
noted  above  are  a  group  of  connected  vowels  whose  separation 
are  said  to  alter  the  meaning,  therefore  they  are  taken 
collectively  and  have  the  special  sub-categorization  name 
"diphthongs."  The  diphthongs  are  alr  aOf  oi,  and  ju. 
Diphthongs  are  also  referred  to  as  the  vowel-glides  since 
there  is  an  alteration  in  the  resonance  which  resemble  the 
glide  consonants. 

The  stop  category  consists  of  those  sounds  which  are 
emitted  as  a  'puff-of-air ,  i.e.,  no  energy  is  followed  by  a 
large  spike  cf  energy.  Stops  are  also  known  as  plosives  due 
to  the  energy  spike,  but  stop  is  more  commonly  used  since 
the  speaker  must  actually  establish  a  stop  in  the  smooth 
expulsion  of  sounds  to  generate  the  plosive  burst.  The  stop 
category  has  the  components:  p,  b,  t,  k,  and  g.  A 
sub-category  of  the  stops  is  the  affricates  tj"  and  dj  which 
are  again  combinations  which  cannot  be  reduced  without 
changing  the  meaning,  therefore,  they  are  classified  as 
unique  and  essential.  ( 

The  third  group  is  known  as  the  fricatives.  These 
sounds  require  a  velocity  change  which  is  achieved  by 
creating  a  narrow  slit  between  the  upper  teeth  and  the  lower 
lip,  the  upper  teeth  and  the  tongue,  or  the  upper  teeth  with 
the  lower  teeth.  The  objective  is  to  create  a  higher 
frequency  sound  at  a  higher  velocity.  The  components  of 
this  category  are:  f,  v,  6,  ft,  s,  z,  J,  J,  and  h.  At 
present  there  are  no  apparent  sub-categories  which  are 
considered  unique. 

The  nasal  category  actually  consists  of  glides,  nasals, 
and  laterals.  The  glide  is  so  called  because  of 
articulation  organ  movement  required  in  its  generation.  For 
example,  note  that  when  the  single  sound  of  "r"  is  generated 
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the  oral  cavity  enlarges,  specifically  note  that  the  tongue 
drops  in  position.  Enlarging  the  vocal  cavity  tends  to 
lower  the  frequency  of  resonance,  such  that  the  sound  is 
readily  identifiable  as  a  smooth  transition  from  a  high  to  a 
lower  frequency.  The  nasal  sounds  are  those  sounds  which 
are  emitted  via  the  nasal  cavity  only,  that  is  the  mouth  is 
blocked  by  a  tight  closing  of  the  lips  for  the  sound  of  "m," 
and  by  the  tongue  pressed  firmly  against  the  hard  palate  for 
the  generation  of  "n."  The  final  component  of  this 
sub-category  is  generated  when  the  mouth  is  blocked  by  the 
center  and  back  of  the  tongue  to  form  the  sound  associated 
with  tj  .  The  lateral  has  a  single  component  "1."  The 
lateral  utilizes  both  the  nasal  and  oral  cavities  for  the 
generation  of  this  glide-like  sound. 

The  final  category  is  that  of  pauses.  A  pause  is  an 
obvious  lack  of  sound  of  sufficient  duration  so  as  to 
provide  a  well-defined  boundary  for  a  word  or  phrase  as 
appropriate.  Pauses  really  represent  a  special  situation 
that  requires  a  more  indepth  discussion. 

The  pause  is  that  period  in  speaking  which  is  denoted 
by  the  total  absence  of  sound.  In  writing  one  provides  word 
separations  cr  boundaries  by  the  absence  of  script  or  by 
leaving  an  intentional  space.  Unfortunately  this  does  not 
follow  in  speaking.  In  speech,  words  'are  run  together  such 
that  a  combination  of  words  (hereforrh  defined  as  a  phrase) 
would  appear  as  a  single  utterance  which  is  devoid  of 
pauses.  For  example,  the  phrase  "the  brown  cow"  is  spoken 
as  "thebf cwncow. "  In  a  transcription  from  the  text  the 
phrase  becomes  "3a  braun  kau,"  but  the  spoken  appears  as 
"c^abraunk  u."  This  draws  forth  the  problem  of  sound  pattern 
significance  for  the  two  cases  described  as  (1)  with  and  (2) 
without  pauses. 

It   appears  as  though  a  pause  may  or  may  not  be  present 


52 


with  equal  probability.  In  the  case  of  English  it  is 
observed  that  three  distinct  areas  enter  into  the  study  of 
pause  insertion.  Speaking  generally  for  the  U.S.A.,  the 
Northeast  coast  population  speak  very  rapidly  and  pauses  are 
difficult  to  detect;  Southerners  speak  very  slowly,  so  that 
pauses  are  distinct  and  occur  more  often; 
Westerners/mid-westerners  fall  somewhere  in  between, 
representing  a  median  for  the  extremes.  The  actual 
detection  of  word  boundaries  via  the  spectrograph  or 
similiar  process  has  not  been  achieved  with  any  degree  of 
accuracy,  and  is  particularly  poor  with  an  unknown  sample 
[Ref.  21].  Therefore  the  problem  must  be  looked  at  from  two 
points  of  view.  The  first  looks  at  the  sound  patterns  based 
on  individual  word  list  inputs.  The  premise  here  is  that 
the  probability  of  any  word  beginning  a  phrase  could  be 
high.  From  the  words  of  the  phrase  "the  brown  cow"  one 
would  certainly  expect  the  article  "the"  to  follow  a  pause 
with  a  high  degree  of  certainty.  The  word  "brown"  could  be 
given  a  probability  assignment  of  .5  (eguiprobable  that  it 
would  or  would  not  begin  a  phrase  with  some  certainty) .  The 
word  "cow"  would  have  a  much  lower  degree  of  certainty 
associated  with  it,  but  greater  than  zero,  since  words  such 
as  "cowboy,"  etc.  exist.  A  second  argument  would  be  that 
only  phrases  (devoid  of  pauses)  exist  and  they  therefore, 
should  be  the  only  sound  strings  used  in  the  analysis. 

The  solution  to  these  points  as  far  as  this  thesis  was 
concerned  was  to  look  at  both  words  and  phrases, 
individually  and  collectively.  The  rationale  being  that 
since  the  analysis  only  looks  at  the  first  four  and  last  two 
of  the  scund  string,  and  since  there  is  sufficient 
probability  that  any  given  word  may  be  the  first  word  in  a 
given  string  (phrase)  ,  that  the  characteristics  of  that 
individual  word  are  very  germane  to  the  sound  string 
analysis.  The  use  of  phrase  analysis,  recognizes  that  pause 
detection  may  be  very  applicable  in  the  conversion  of  spoken 


53 


sounds  to  a  computer-acceptable  input. 


A  series  of  sound  emissions  can  be  observed  either  in 
whole  or  in  part  wherein  individual  sounds  can  be  sensed 
categorically  or  uniquely,  dependent  upon  the  type  of 
analysis  which  is  desired.  In  the  analysis  by  Young  [Ref. 
20]  he  was  able  to  concentrate  on  the  nasal  phonetation  by 
first  carefully  selecting  words  (including  nonsense  words) 
which  clearly  contained  significant  nasal  sounds,  then  via  a 
masking  or  filtering  technique  he  removed  those  quantities 
which  were  not  of  concern  to  him.  Others  have  used  a 
variety  of  masking  techniques  to  eliminate  all  but  the 
desired  elements  of  the  test  speech. 

The  concern  herein  was  not  to  extract  any  sounds  or 
rely  on  the  uniqueness  of  sounds  for  the  purpose  of 
recognition.  Rather  the  intent  was  to  establish  whether  or 
not  sound  patterns  are  unique  to  languages,  on  either  an 
individual  or  a  categorical  basis.  In  order  to  achieve  this 
end  it  is  necessary  that  sounds  can  be  uniquely  defined 
categorically. 

ELECTRONIC  PERCEPTION  OF  SOUND 

Many  attempts  to  fully  comprehend  the  operation  of  the 
vocal  system  have  been  made  through  thl  ages.  A  large 
number  of  models  were  constructed  across  time,  many  were 
unsuccessful,  while  others  proved  major  contributions.  In 
the  late  ITOOVs  three  mechanical  models  were  independently 
produced  by  Kratzenstein,  VonKempelen,  and  Hheatstone,  each 
of  which  used  bellows,  leather  resonators,  and  reeds  to 
create  fricative,  plosive,  and  vowel  sounds  [Ref-  18].  The 
first  real  electrical  model  of  any  value  was  the  "VODER," 
(VOice   Operation   DEmonstratoR)  ,   developed  by  H.  Dudley  in 
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the  1930'sf  (Dudley  also  developed  the  first  VOCODER:  voice 
CODER;  also  in  the  1930's).  The  VODER  consisted  of 
oscillators,  resonance  chambers  and  a  keyboard  to  control 
the  frequency,  amplitude,  and  duration  of  each  sound  in  the 
formulation  of  words  at  its  speaker  output.  The  VODER  had  a 
vocabulary  of  2500  words  [Ref.  22,  pp.  16,  32,  49,  191]. 

The  spectrograph  is  an  analysis  tool  which  came  into 
being  in  the  1940 »s  as  a  result  of  studies  by  Koenig,  Dunn, 
and  Lacy  [Refs.  3  and  23].  There  are  various  types  now 
being  used,  however  they  have  common  operations  in  that  all 
take  in  speech  sounds,  filter  separate  the  sound  into  bands 
(bandpass  filtering)  and  display  the  results  on  a  frequency 
(vertical)  versus  time  (horizontal)  basis.  The  spectrograph 
uses  basically  a  Fourier  analysis  processing  [Ref.  3].  One 
motivating  factor  behind  the  development  of  the  spectrograph 
was  the  desire  to  have  a  visible  speech  mechanism  to  aid  the 
learning  process  for  deaf  persons.  Many  side  uses  were 
subsequently  developed  for  the  spectrograph.  Peterson  and 
Barney  used  the  spectrograph  technique  to  confirm  that  most 
English  sounds  occur  in  the  standard  telephone  bandwidth  of 
300-3300HZ  [Ref.  18,  p.  154].  Spectrograms  have  been  used 
as  a  means  to  develop  speaker  identification  through 
"voiceprints."  Voiceprints  are  unfortunately  not  at  a  state 
where  100%  accuracy  is  consistant  with  experimental  results. 
Therefore,  voiceprints  promote  (presently)  a  shadow  of  doubt 
in  their  reliability  and  are  not  accepted  as  a  legal  tool. 
The  voiceprint  area  is  one  of  considerable  interest  to  the 
speaker  recognition  subgroup  of  the  Acoustic  Society  of 
America,  and  was  the  subject  of  attention  during  a  special 
open  discussion  during  the  90th  meeting  in  San  Francisco 
[Ref.   9]. 
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APPENDIX  3 

Some  Characteristics  of  Vocal  Tract  Transmission 

FORMANT  =  manifestation  of  the  normal  modes  as  spectral 
peaks  in  the  output  sound,  which  are  derived  from 
the  transmission  function  relating  the  mouth  and 
glottal  volume  currents.  The  transmission 
function  is: 


•   -  _I_  = i 1 = 1 


where    =  w/c  and  w   =  (2n  ♦  1)y-r- 


Formant  Parameters: 
p 
I»a  =  a  =  acoustic  inertance/unit  length 

Ca  =  pqT   ~   accoustic  compliance/unit  length 

Ra  =  -^S  iJ-%--   =  acoustic  resistance/unit  length 


ma 


Ga    =   ~y- —     •%/~oT^ —   =   acoustic   conductance/unit   length 

PC        ^  *^p  p 

A  =  tube  area  =  5cm2  =  0.775  in2 

r  =  radius  of  tube  ■  1.26cm  =  0.497in 

S  =  tube  circumference  =  7.9265cm  =  3. 12in 

p   =  air  density  =  1.14  x  10  '3gm/cm2, 

(moist  air  at  body  temperature  =  37  C) 
C  =  sound  velocity  =  8.5  x  10*cm/sec, 

(moist  air  at  body  temperature  =  37  C) 
m  =  viscosity  coefficient  =  1.86  x  10  •  dyne-sec/cm2 , 

(20  C,  0.76  in.Hg.) 
>  =  coefficient  of  heat  conduction 

=  0.055  x  10  3cal/cm-sec-deg  (0  C) 
1  =  adiabatic  constant  =  1.4 
cp  =  specific  heat  of  air  at  constant  pressure 

=  0.24  cal/gm-deg  (0  C,  1  atmos.) 
1  =  tube  length  =  17cm  =  6.693in  (for  avg.  male) 

£  =  -£-=  ffi  =  .(11141) 
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-sfr^F 


2     1  Ca 


The   formant    frequencies   as    computed   are: 


v   =    (2n    +    1)  (-f-)  (-^-)  f   =     (2n    *    1)  (^-) 

=    (2n    +    1)  (3230/sec) ,  =    (2n    ♦    1)  (514.4), 

n=0,1,2,...  n=0,1,2,... 


w  =  3230  radians  f  =  514.4  Hz 

w  =  9690  radians  f  =  1543.3  Hz 

w  =  16160  radians  f  =  2571.9  Hz 

v  =  29070  radians  f  =  4630  Hz 


57 


APPENDIX  C 
TRANSCRIPTION  SYMBOLS 
ROMI  to  IPA  Conversion  Tables 

Table  C-I.   Fricative  Conversion 

ROMI  IPA 

P  f 

V  v 

q  .      e 

T-H  5 

S  s 

z  z 

s-s  J 

z-z  3 

B  h 

Q-A  § 

B-B  0 

C-H  C 

S-H  S 

Z-H  Z 

X  X 

G-F  g 

X-X  X 

R-B  6 

H-H  fc 

D-R  J 

Z-C  £ 

J-A  j 

G-B  y 
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Table  C-II-  Nasal  Conversion 


ROMI  IPA 

M  m 

N-N  n 

N-J        N  Q 

L  1 

H  v 

H-W  hw 

J  J 

R-R  r 

R  R 

M-J  n) 

J-N  p 

H-Q  ^ 

N  N 

A-N  °*- 

K-Z  ^ 

L-L  | 

H-T  £ 
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Table  OIII.    Stop  Conversions 


ROMI  IPA 


P  P 

T  t 

B  b 

D  d 

K  K 

G  g 

OC  c 


F-F 
T-T 


i 

t 
D-D  d 

q-q  q 

G-G  G 

N-0  ? 

AFFRICATIVES 

T-S  tj 

D-Z  ^ 

P-F  f* 

B-V  bv 

T-L  is 

k 


T-M 
T-C 
K-X 
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Table  C-IV.  Vowel  Conversion 


EOMI 


IPA 


I-I 

I 

E-E 

E 

A-E 

A 

C 

0 

0 

0-0 

v-v 

0-T 
0-H 

E-R 

A-A 

A-B 

3-R 

Y-I 

Y 

0-0 

0-E 

G-A 

H-W 

I-T 


l 

e 

£ 
ae 

a 
O 
0 
0 
u 

A 

3 

3,  (&) 

a 
3 

y 

Y 
<t> 
oe 

ui 

i 


DIPHTHONGS 


A-I 
C-I 
J-0 
A-0 
0-0 


al 

I 

ju 

aO 

oO 
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Table  OIV. 

(cont. ) : 

ROMI 

DIPHTHONGS 

IPA 

C-E 

Qa* 

E-Q 

£** 

A-R 

a^ 

I-R 

I 

0-S 

0 

E-S 

<£a 

1-0 

I 

0-Q 

0 

C-Q 

Od 

E-I 

el 
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APPENDIX  D 

The  data  and  graphs  contained  in  this  appendix  were 
used  in  an  attempt  to  achieve  a  decision  model  to 
differentiate  languages.   In  each  language  the  data  reading 
across  the  sound  rows  are  normalized  to  100;  the  columns 
were  not  normalized,  however,  the  columnar  data  were  used  to 
compute  the  mean  S  (x)  ,  and  the  standard  deviation  <r(x)  .   The 
graphs  were  generated  in  accordance  with  formula  (4). 


Table  D-I.   Combined  Vector  Data 


Lng   Sounds    F         N         S         V       #wds 


A 

1 

33.48 

16.29 

39.82 

10.41 

221 

A 

1-2 

0.98 

7.84 

5.88 

85.29 

204 

A 

1-2- 

3 

17.46 

45.24 

7.  14 

30.16 

126 

A 

1-2- 

3-4 



A 

n 

15.46 

54.63 

11.34 

18.56 

97 

A 

n-1 

1.35 

17.57 

5.41 

75.68 

74 

A 

E(x) 

13.75 

28.31 

13.92 

44.02 

A 

tf(x) 

10.22 

18.21 

13.  12 

30.58 

B 

1 

28.87 

16.49 

23.71 

30.93 

97 

B 

1-2 

4.55 

39.39 

1.52 

54.55 

66 

B 

1-2- 

3 

9.80 

25.49 

27.45 

37.25 

51 

B 

1-2- 

3-4 



B 

n 

7.31 

14.63 

0.00 

78.05 

41 

B 

n-1 

24.  14 

20.69 

34.48 

20.69 

29 

B 

E(x) 

14.93 

23.34 

17.43 

44.29 

B 

<*(x) 

9.71 

8.85 

14.05 

20.15 
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Table   D-I    (cont.) : 


c 

1 

20.61 

20.33 

26.  18 

32.87 

3  59 

c 

1-2 

10.53 

26.32 

9.72 

53.44 

247 

c 

1-2- 

3 

17.01 

31.44 

19.07 

32.47 

194 

c 

1-2- 

3-4 



c 

n 

3.53 

32.35 

7.06 

57.06 

170 

c 

n-1 

9.22 

36.17 

17.02 

37.59 

141 

c 

E(x) 

12.  18 

29.32 

15.81 

42.67 

c 

C(x) 

6.01 

5.48 

6.83 

10.48 

D 

1 

25.31 

23.65 

19.92 

3T.12 

241 

D 

1-2 

4.76 

16.67 

14.  17 

74.40 

168 

D 

1-2- 

3 

19.27 

32.  11 

11.93 

36.70 

109 

D 

1-2- 

3-4 



D 

D 

15.66 

27.71 

25.30 

31.33 

83 

D 

n-1 

13.04 

18.84 

18.84 

49.28 

69 

D 

E(x) 

15.61 

23.80 

18.03 

44.57 

D 

tf(x) 

6.81 

5.65 

4.67 

16.31 

E 

1 

33.22 

14.29 

32.22 

18.27 

301 

E 

1-2 

7.36 

22.48 

21.32 

48.24 

258 

E 

1-2- 

3 

12.27 

25.00 

25.90 

36.82 

220 

E 

1-2- 

3-4 



E 

n 

10.84 

13.79 

7.88 

64.49 

2  03 

E 

n-1 

13.  16 

28.95 

29.47 

28.42 

203 

E 

E(x) 

15.37 

20.90 

23.36 

39.85 

E 

tf(x) 

9.14 

5.97 

8.56 

16.97 
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Osing  the  data  from  table  D-I  and  the  following 
information  from  table  6.1  of  Lipschutz[ Ref .  17],  points 
were  calculated  for  the  magnitude  coordinates  at  0,  ±|,  ±2, 
and  ±3  standard  deviations,  for  each  category: 

0  =   0.4        ±1  =   0.242     ±2  =   0.054     ±3  =   0.0044 

Table  D-il.   Fricative  Magnitudes 


-3 

-2 

-1 

0 

1 

2 

3 

A,X 

-16.91 

-6.69 

3.53 

13.75 

23.97 

34.  19 

44.41 

A,F(x) 

.0004 

.005 

.024 

.039 

.024 

.005 

.0004 

A,fiT(X) 

10.22 

B,X 

-14.2 

-4.49 

5.22 

14.93 

24.64 

34.35 

44.06 

B,f  (X) 

.0005 

.006 

.025 

.041 

.025 

.006 

.0005 

B,(T(X) 

9.71 

C,X 

-5.85 

0.  16 

6.  17 

12.18 

18.  19 

24.2 

30.21 

C,f  (X) 

.0007 

.009 

.040 

.067 

.040 

.009 

.0007 

c,tf(x) 

6.01 

D,X 

-4.82 

1.99 

8.8 

15.61 

22.42 

29.23 

36.04 

D,f  (x) 

.0006 

.008 

.036 

.059 

.036 

.008 

.0006 

D,  flT(X) 

6.81 

E,X 

-12.05 

-2.91 

6.23 

15.37 

24.51 

33.65 

42.79 

2,f  (x) 

.0005 

.006 

.026 

.044 

.026 

.006 

.0005 

ErO'(X) 

9.8 

65 


*n 

UJ 

1- 

t/O 

>0 

"7 

Ui 

UJ 
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Table   D-III.    Nasal    Magnitudes 


-3 

-2 

-1 

0 

1 

2 

3 

A,X 

-26.32 

-8.  11 

10.  1 

28.31 

46.52 

64.73 

82.94 

A,f  (X) 

.0002 

.003 

.013 

.022 

.013 

.003 

.0002 

A,  *T(X) 

18.21 

B,X 

-3.21 

5.64 

14.49 

23.34 

32.  19 

41.04 

49.89 

B,f  (X) 

.0005 

.006 

.027 

.045 

.027 

.006 

.0005 

B,  d{x) 

8.85 

C,X 

12.88 

18.36 

23.84 

29.32 

34.80 

40.28 

45.76 

C,f  (x) 

.0008 

.01 

.044 

.072 

.044 

.01 

.0008 

C,^(x) 

5.48 

D,X 

6.85 

12.5 

18.  15 

23.80 

29.45 

35.  10 

40.75 

D,f  (X) 

.0007 

.010 

.043 

.071 

.043 

.010 

.0007 

D,  flf(X) 

5.65 

E,X 

2.99 

8.96 

14.93 

20.90 

26.87 

32.84 

38.81 

Erf  (X) 

.0008 

.009 

.041 

.067 

.041 

.009 

.0008 

e,<t(x) 

5.97 
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Table  D-IV.  Stop  Magnitudes 


-3 

-2 

-1 

0 

1 

2 

3 

A,X 

-25.44 

-12.32 

0.80 

13.92 

27.04 

40.16 

53.28 

A,f  (X) 

.0003 

.004 

.018 

.031 

.018 

.004 

.0003 

A,tf(x) 

13.12 

B,X 

-24.72 

-10.67 

3.38 

17.43 

31.48 

45.53 

59.58 

B,f  (x) 

-0003 

.004 

.017 

.028 

.017 

.004 

.0003 

c,  <r(x) 

14.05 

c,x 

-4.68 

2.15 

8.98 

15.81 

22.64 

29.47 

36.30 

C,f  (x) 

.0006 

.008 

.035 

.059 

.035 

.008 

.0006 

C,<f(x) 

6.83 

D,X 

4.02 

8.69 

13.  36 

18.03 

22.70 

27.37 

32.04 

D,f  (x) 

.0009 

.012 

.052 

.086 

.052 

.012 

.0009 

Dr  <T(X) 

4.67 

E,X 

-2.32 

6.24 

14.8 

23.36 

31.92 

40.48 

49.04 

E,f  (x) 

.0005 

.006 

.028 

.047 

.028 

.006 

.0005 

E,  if(x) 

8.56 
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Table   D-V.    Vowel   Magnitudes 


-3 


-2 


-1 


A,X 

-47.72 

-  17.  14 

13.44 

44.02 

74.60 

105. 18 

135.76 

A,f  (x) 

.0001 

.002 

.008 

.013 

.008 

.002 

.0001 

A,0W 

-16.16 

3.99 

24.  14 

30.58 
44.29 

B,X 

64.44 

84.59 

104.74 

B,f  (X) 

.0002 

.003 

.012 

.020 

.012 

.003 

.0002 

B,  tf(x) 

20.15 

C,X 

11.23 

21.71 

32.  19 

42.67 

53.  15 

63.63 

74.11 

C,f  (x) 

.  0004 

.005 

.023 

.038 

.023 

.0  05 

.0004 

C,tf(x) 

10.48 

D,X 

-4.36 

11.95 

28.26 

44.57 

60.88 

77.19 

93.5 

D,f  (x) 

.0002 

.003 

.015 

.025 

.015 

.003 

.0002 

D,^(x) 

16.31 

E,X 

-11.06 

5.91 

22.88 

39.85 

56.82 

73.79 

90.76 

E,f  (x) 

.0003 

.003 

.014 

.024 

.014 

.003 

.0003 

E,<r(x) 

16.97 

/ 
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*  ♦  *  * 

*  *  *  * 

*  *  *  * 

*  *  *      •  * 

*  *#</>♦ 

*  *  *         UJ  * 

*  *  *       oo  * 

*  *  #       CO  # 
■H-  *  *        <  * 

*  *  *         _J  # 

»  *  ♦     o  * 

♦  #  #  * 

*  »  *       >  » 

*  *■  #       CL  # 

*  *  *  » 

*  *  ■»*        LU  * 

*  #  *LUX  * 

*  ♦  *  IK  # 

*  #  **-  * 

*  *  *       O  * 

*  *  *z>-  ♦ 

*  *  ♦  •-•Z  * 
•It-  *  *      •_«  « 

*  *  *o  *      > 

*  *  *  UJl-  * 

*  •-<      *  ♦  COI3  ♦       3 

*  «  *DQ-  *         I 

*  a    #  *     z  #     < 

*  LU      *  -ft  Zm  * 
»  CD      *  *C  * 

*  3"      *  ♦»-<  *      >  co> 

*  Z>     «  *h-Q-  ♦ 

*  Z     *  *<t—>  *     a:  j-D 

*  #  *h-  *       I  II 

*  *  *ZLU  ♦       <  K-3 

*  *  ♦  LUX  * 
«  K      *  ♦  </»-  ♦ 

*  *  ♦LU  *       LL      >      >  cO> 

*  3    ♦  ♦  a:x  ♦ 

*  *  ♦  aa  *     Z     O    co  co»- 

*  a     ♦  ♦  LUCC  *       I       I        |  II 

*  ♦  *QCU-  ♦       <      O       LU  H-3 

*  h-      ♦  ♦  ♦ 

*  ♦  ♦  CC  Z  * 

*  3      ♦  ♦  LUO  *       >      >      >      to      >  CO  co> 

*  *  ♦  *-»-«  * 

*  O     *  ♦  Oco  »      •-.     »-i     a     o     3  3  Zen 

*  *  *<a:  ♦      I       I       I       I       I  I  II 

*  *  ♦  o:lu  ♦      <     o     lu     o     «->  Z  fr-O 

*  ♦  ♦  <>  * 

*  C*       ♦  #IZ  * 

*  *  #UO  *        >       U.       >       LU       >>  Z>  Z       COLL.  U. 

*  LU       *  ♦       O  ♦ 

♦  *  ♦  <_>  ♦     cu    i     o    u_    *-3  ao        •-     _ja:  inj 

♦  t-      ♦  ♦  ►-LU  *         I         I         I         I         I    I  II  III  I 

♦  *  *»-X  *       <t      O      LU      O      i-4-d  ZO  a£      K-3  NJ 

♦  3     #  ♦  cut-  * 

♦  ♦  ♦  Z  ♦ 

♦  CL       «  *CLL  *        >CO>CO>       U-Z>ZLL  Z>       OZU_LU>  >LL 

♦  *  *  ID  ♦ 

♦  3L"      ♦  *a  *       CD>LUi»g»-i      QDSclZN  ZO      OctCOXO  >X 

♦  ♦  ♦      Z  -*       Mill        I    l    i    I    I  II        i    i    I    l    I  II 

♦  G     ♦  *  luc  *      <<ouQUj     OIh^         Zo     Oae:co»-Z>  >^ 

*  ♦  ♦    Xt-H  ♦ 

*  O      ♦  *KI-  * 

*  ♦  ♦        <  ♦        >LL.COCO>CO>LL>U.COZZZ>COLLLULLCO>>>LLZLL. 

*  ♦  ♦  </>»-  ♦ 

*  ♦  «mZ  *       <tDOQUJU.<Iw<X_J-)-5lUU-<lCDIUI>5XOO 

*  *  ♦       LU  ♦         I     I     I     I     I     I     I     I     I     I     I     I     I     I     I     I     I     I     I     I     I     I     I     I     I     I 

*  ♦  *  -  X  ♦       <(DOQaJU.OlM-)^_lZZOQ.OaoOh-3>3X>.N 

*  ♦  ♦  ♦-LU  ♦  •> 

♦  *  ♦  si-i  * 

*  *  ♦  OCl  *        >VJ>CO>LLCOU.>ZCOZZZ>OOLLZLLCO>LLZLU>LL,£X 

*  *  •*  .  h-  *      <ccuQUJU.OlM-)^_iSZCCLOafc0>-O>3X>Mfri 
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*  * 

*  * 

*  #  >t 

♦  #  >       CVJ 

*  *  Er 

*  *  o 

♦  ♦  U.  -4- 
»  *  Zoo          Z                                                                                                                         • 

♦  *  >ZZ2>  O 

♦  #  oo>>>oo  -• 

♦  *  z    a.  t/<2w> 

♦  *  >    >  >z> 

♦  *  LL      COZ      LU      Z>co 

*  *  >    >z^z 

♦  *  Z       LL>LU 

♦  *  Z       U->  CO            Z 

♦  *  >Z>cO  z> 

♦  *  </)>ZZ     >     z>z 

♦  ■»  >Z>>U-OOoo>z>  O 

♦  *  >Z>LL>ZZLL>  CO       O 

*  *  co>  z>>>>                                                                                                  cr 

♦  *■  LL  OOLLLLZLLZ                                                                                                                                                         »H 

»  *  zz         coco     >                                                                                                                     CO 

*  *  z    >>  zz    u.                                                                                             • 

*  *  >ZcocoooZ>>Z  a> 

*  *  z>z    z>z>>  co 

*  *  >Z>     >oo     ZZ> 

■«•  *  >LLZLLLL      ll>z 

*  *  >     >co>z     oo>  CO 

*  #  z  coZLL>      ZU-                                                             LU               Z                   CO 

*  #  >        >        >        OOZ>  >                    >                          NN 

*  *  UuZU-      Z  >LL                                                                     Z                Z 

**>>>Z>  >  OC 

*  *  CO       COCO>       CO  CO                       LU 

*  S     #  z    zzzu->    z  >                      •    t-                 o 

*  <    *  >z>>>>co    >  co                     c     <           a 

*  S        *  LU>COLLcOOO      OOcOLL  >                                                                         Z            UJ      UJ 

*  *  to  >      >      >Z      LLLL                                                 >          h-      £* 

*  II        »  LUZ       CO       Z>       >>  CO>       U->LL            C       O 

*  #  >     ZZZU->     co  >co     coco                 a.     zz     >co             Z 

*  a»     *  zz»»Z     >  llll                            >     >>     coll                    a. 

*  O     #  >>U-COZZi/jCOcOZ  >                Z                COZLLLLOO      >>           CO      o 

*  <      *  U-Z      Z>COZU-      >  CO      LLLL>           COLU>00      Z      ZZ           ^ 

*  O       ♦  >       >Z       >>       00       COU_Z>>CO  LL>ZLL       >CO       >                       ~* 

*  O     *  cO>co>  ZZ>      Z      >U_ZZ          >U->>>co>     u.          Q 

*  Z     *  cozco     coZ  >co     >     co     >>         Z     >Zco     co>             z     X 

*  <       *  Z>  CO>Z       CO>       ZLL             >COZZ            LL                       CO                  D      |- 

*  _J     *  >U-      Z>      >>>co  >     coco     >>      >              Z          >          O     O 

*  *  LU>  >COZ                 COLUZ           ZZLLCO      LU>>Z      CO           CO       Z 

*  *  >Z       Z  CO            CO       >>       Z>>>LUZ>COZ>LU                            LU 

*  *  COZCO>Z>  ZOO       Z       COLLZ>LUZZ>>COZ>CO>                  t-       — I                              CO 

*  »  Z>>CO>ZZ>>Z       >Z  >ZCO>>COCO       LL>>>LL            CO                            Z       l^ 

*  *  >>LLZOO       >ZcO>       LU>  CO>       COOO                  >COZcO>            CL       LU                             O* 

*  *  LU  >Z       CO>>LL       OOLLLL>LLOO       CO                 COU-LLCO       COLL       «-•       O                             CO 

*  *  CO  CO>>ZLU>V)       LU       >CO>LLZ>       LLLU>Z       Z             >       LL                                       CM 

»  ♦  ZLLLLU-ZZ>            Z       >       Z       LU»c0CO>>CO>       >Z       LU                  LU                               • 

*  ♦  >z>  z         >     ZZ>         </>Z     >ZZ         Zco>Z         X     _j                     >o 

*  #  Z>co  >ZZ          >*s>Z      LU>      Zco>          >>co> 
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*  ♦  >      COLLZ  U-ZZ>      CO      Z                 LUCO>>00>      CO 
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\ *************************************************** ********* 

COMPUTER  PROGRAM       NUMBER     1 

************************************************************ 

//COOK1    JOB    (0405,1404, MA52)  ^SMC    2737 ■  ,TI ME= ( 00 , 40 ) 

//    EXEC    ALGOLW 

//SYSPRINT    00    SYS0UT=A,DCB=BLKSIZE=665,SPACE=(CYL,(3,1) ) 

//ALGOL. SYSIN    00    * 

SALGCL    T=035,P=80 

BEGIN 

COMMENT    INPUT    DATA    WRITTEN    IN    "ROMI"    WITH    AT    LEAST    ONE     BLANK 

BETWEEN    WORDS.       WORD    ^UST    START    AND    END    ON    THE    SAME    CARD.       ; 

STRING     (2)    ARRAY    ROMI     ( 1 : : 101 i 1 : : 2) ; 

STRING(80>    TEXT; 

INTEGEP    INDEX    • POI NTER , Z , TP , WP ,N ; 

REAL    TWOCOUNT»THREECOUNT,FOURCOUNT»Q; 

STRING(36)    WORD, CODE; 

STRING     (1)    ARRAY    CLASSC1:  :5)  ; 

REAL    ARRAY    S OUNDCNE ( 1 :  : 5  )  ; 

STRING     (2)    ARRAY    SOJNDTWO ( 1 :  :  25  )  ; 

REAL    ARRAY    SOUNDTWOSTAT (  1 :  :25)  ; 

REAL    ARRAY    SOUN OTHR EESTAT ( 1 :  :  125  )  ; 

ST"ING(3)    ARRAY    SOUNDTHREE ( 1 : : 125  )  ; 

REAL    ARRAY    SOUNDFOURST AT    (1::625); 

STRING(4)    ARRAY    SOUNDFOUR ( 1 : : 625 ) ; 

REAL    ARRAY    VECTWD    <1::5); 

REAL    ARRAY    VECTHREF    Q::5); 

INTEGER    EPOINT; 

INTEGER    HEADERCOUNT; 

STRING(80)    ARRAY    HE&DEP     (1::10); 

REAL    ARRAY    ENDTWOS^AT     (1::25); 

REAL  ARRAY  ENDONE  (1::5); 

REAL  ARRAY  ENDVEC2  (1::5); 

LOGICAL  FOUND, BAD; 

REAL  ARRAY  STATMUX1  (1::5,1::5); 

REAL  ARRAY  PMUX1  (l::5tl::5); 

REAL  ARRAY  VECFOUR  (1::5); 

REAL  B; 

REAL  ECOUNT,  E_1C0UNT; 
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COMMENT   ****************************  **  ***************  ****** 
PROCEDURE  INITIALIZE  RESETS  THE  VALUES  OF  THE  GLOBAL 
COUNTER?  USED  THROUGHOUT  THE  PROGRAM.   INITIALIZE  ALSO  READS 
AND  PRINTS  THE  DATA  SET  IDENTIFIER  "HEADER,"  SEATING 
"TEXT  POINTER."  "TPt"  TO  80  CAUSES  THE  PROCEDURE  GETWORD 
TO  READ  THE  FIRST  DATA  CARD, 

************************A** ******************* *************; 

COMMcNT ************ ********** 

HEADERCOUNT  IS  THE  NUMBER  OF  CARDS  PRECEEDING  THE  DATA 
WHICH  DESCRIBE  THE  TYP E/QU AL ITY/ ETC.  OF  THE  DATA  BUT  ARE 
NOT  TO  BE  REAC  AS  PART  OF  THE  DATA. 
***************************** ; 

PROCEDURE  INITIALIZE; 

BEGIN 

Q  :=  0; 

TWOCOUNT  :=  0; 

THPEECOUNT  :=0; 

FOURCOUNT  :=  0; 

E  1C0UNT  :=  0: 

E^CUNT  :=  0; 

INDEX:=0; 

READ  (HEADERCOUNT)  ; 

FOR  I  :=  1  UNTIL  HEADERCOUNT  DO 

BEGIN 

HEADER  (I)  :=  "  "; 

REAOCAPC  (HEADERU ) ); 

WRITE  (HEADER(D); 

END; 

IOCONTPOL  (2); 

WRITE("  ")  ; 

IOCONTROL  (2); 

TP  :=  80 

END  INITIALIZE; 
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COMMENT      *************************************************** 
PROCEDURE    GENERATETWO    PROVIDES    THE    25    TWO-SOUND    CLASS    LABEL 
DESIGNATIONS    IN    ALPHABETICAL    ORDER.       THESE    LABELS    ARE 
STORED    IN    THE    ONE    DIMENSION    ARRAY    "SOUNDTWO."       THE    LABELS 
CORRESPOND    TO    THE    25    ROWS    OF    THE    REAL     ARRAY    "S OUNDTWOST AT .» 

******** ******* ****************************** **************; 

PROCEDURE    GENERATETWO; 

BEGIN 

INTEGER    YJ 

Y  :=    1; 
FOP    I     :=    1 
BEGIN 

SOUNCONE(I) 
FOR    J    :=    1 
BEGIN 

SOUNDTWO  (Y)(0  1)  :=  CLASS  (I) 
SOUNDTWO  (Y)(l  1)  :  =  CLASS  (J) 
SOUNDTWOSTAT(Y) 

Y  :=    Y    +    1 
END; 
END; 
END    GENERATETWO; 


UNTIL    5    DO 


:=   0 

UNTIL 


5    DO 


=    0 


COMMENT      *************************************************** 
PROCEDURE    GENERATETHREE    TAKES    THE    25    ELEMENT    ARRAY 
"SOUNDTWO"    AND    GENERATES    THE    125    POSSIBLE    COMBINATIONS    OF 
THE    FIRST    THREE    SOUNOS    OF    A    WORD    IN    ALPHABETICAL     ORDER, 
THE    125    ELEMENTS    ARE    STORED    IN    THE    ONE    DIMENSIONAL    A<?RAY 
"SOUNDTHREE"    AND    ARE    USED    AS    LABELS    FOR    THE    125    ROWS    OF    THE 
REAL    ARRAY    "SOUNDTHREE STAT. h 

***********************************************************; 


PROC 
BEGI 
INTE 

Y  :  = 
FOR 
BEGI 
FOR 
BEGI 
SOUN 
SOUN 
SOUN 

Y  :  = 
END; 
END; 
END 


EDUR 

N 

GER 

l; 

I    :  = 
N 
J    :  = 

N 

DTHP 

CTHR 

CTHR 

Y  +  l 


E    GENERATETHREE; 
Y; 

1    UNTIL    25    DO 

1    UNTIL    5    DO 

EE(Y) (0  12)     :=    SOUNDTWO( I ) ; 
EE( Y) (2(1)     :=    CLASS( J) ; 
EESTAT(Y)    :=    0; 


GENERATETHREE; 


UNTIL    125    DO 
UNTIL    5    DO 


PROCEDURE    GENERA^EFOUR; 

BEGIN 

INTEGER  Y; 

Y  :=  1; 
FOR  I  :=  1 
BEGIN 

FOR  J  :=  1 
BEGIN 

SOUNOFOUR(Y) (0131 
SOUNDFOUR(Y)  (3  ID 
SOUNDFOUPSTAT(Y) 

Y  :=   Y+l 
END; 
END; 
END    GENERATEFOUR; 


:=SOUNDTHREE(I ) 
:=    CLASS (J  I; 
=    0; 
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COMMENT   *************************-************************** 
PROCEDURE  GETARRAY  RE*DS  IN  THE  101  CHARACTERS  USED  BY  THIS 
PROGRAM  TO  REPRESENT  THE  INTERNATIONAL  PHONcTIC  ALPHABET. 
EACH  SOUND  REPRESENTATION  IS  PLACED  IN  A  TWO  COLUMN  ARRAY 
"ROMI."    COLUMN  ONE  IS  THE  SOUND  REPRESENTATION  AND  COLUMN 
TWO  CONTAINS  THE  CLASS:  EITHER  NASAL,  FRICATIVE*  STOP,  OR 
VOWEL.    THE  NUMBER  OF  CARDS  USED  TO  READ  IN  "ROMI"  CANNOT 
BE  VARIED  WITHOUT  ALTERING  ^H?    PROGRAM.    THE  NUMBER  OF 
ELEMENTS  IN  "ROMI"  IS  NOT  VARIABLE.    "RCMI"  IS  PRINTED  OUT 
A  CARD  AT  A  TIME,  JUST  AS  IT  IS  TYPED  IN  THE  DAT*  CARDS. 

***********************************************************; 

PROCEDURE  GETARRAY; 

BEGIN 

STRING(81)  PHONOL; 

INTEGER  B,A; 

B :  =  1 ; 

A  :  ■  1  * 

WRITE  (  "'ROMI'  IS  THE  PHONETIC  CHARACTER  REPRESENTATION 

USED  IN  THE  IMPLEMENTATION  OF  THIS  PROGRAM"); 

WRITE  ("  ") ; 

IOCONTROL  (2)  ; 

WHILE  (A  <=  27)  DO 

BEGIN 

PHONOL  :=  "  "; 

READCARD  (PHONOL); 

WRITE(PHCNOL) ; 

TP:=0; 

WHILE(TP  <=  79)00 

BEGIN 

WHILE  (PHCNOL  (TPll)  =••  '• )  AND  (TP<  =  79)  DO 

TP:=  TP+l; 

IF  (  TP  -•=  80  )  THEN 

BEGIN 

IF  (PHONOL  (TP  +  l  |1  )-.=  "-"  )  THEN 

BEGIN 

ROMI  (B,l):  =  PHONOL  <"rp|l); 

TP:  =  TP+2; 

END 

ELSE 

BEGIN 

ROMI  (B,1)(0I1):  =  PHONOL  (TP|1); 


ROMI  (B,l)(lll):  =  PHONOL  (TP+211) 

TP:=TP+4; 

END; 

ROMI  (B,2):  =  PHONOL  (TP|1)  ; 

B:  =  B+l; 

TP  :=  TP+l 

END 

ELSE 

A  :=  A  +  l; 

END 

END; 

TP  :=  80 

END  GETARRAY; 
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COMMENT   **************************************************** 
LOGICAL  PROCEDURE  GETWORO  REAOS  THE  INPUT  DATA  WRITTEN  ON 
"ROMI"  INTO  A  BUFFER  CALLED  "TEXT,"  ONE  CARD  A""  A  TIME  AND 
ECHO  PRINTS  EACH  CARD  WITH  A  SEQUENTIAL  NUMBER  IDENTIFIER 
"INDEX."    THE  BUFFER,  "TEXT,"  IS  SCANNED  ONE  CHARACTER  AT 
A  TIME  UNTIL  A  "WORD"  IS  BUILT.   LEADING  AND  TRAILING 
BLANKS  DELIMIT  A  "WORD."    "WORD"  IS  THE  GLOBAL  PARAMETER 
OF  STRING  TYPE  OF  MAXIMUM  LENGTH  OF  36  CHARACTERS  WHICH 
IS  DELIVEREO  TO  THE  MAIN  PROGRAM  AND  SUBSEQUENT  PROCEDURES. 
WHEN  THE  CHARACTER  «%"     IS  ENCOUNTERED  ON  A  DATA  CARD  IN 
OTHER  THAN  CARD  COLUMN  1  THE  LOGICAL  VALUE  OF  "GETWORD"  IS 
SET  TO  FALSE  THUS  SIGNALLING  THE  END  OF  A  DATA  SET. 
"WORDS"  MUST  START  AND  END  ON  THE  SAME  CA<?D. 

*********#*************************************************; 

LOGICAL  PROCECURE  GETWORD  (STRING(36)  RESULT  WORD): 

BEGIN 

WP  :  =  0  * 

IF(TP=80)  THEN 

BEGIN 

INDEX: « INDEX* l; 

READCARD  (TEXT); 
WRITEUNDEX,"    ",TEXT); 
TP:=0 
END; 

WHILE(TEXT(TP |1 )="  "I   DO 
BEGIN 
TP:=TP+1; 

IF  (TP=80)  THEM 
BEGIN 

REACCARD    (TEXT); 
INDEX:=INDEX+l; 
WRITE     (INDEX,"         ",     TEXT); 
TP:=0 
END 
END; 

Woro:="  "; 

WHILE  (TP<80)  ANO  ( TEXT ( TP | 1 ) -="  ")  DO 
BEGIN 

WORD  (WP|1) :=  TEXT(TP| 1)  ; 
WP  :=  WP  +  1; 
TP  :=  TP  +  1 
END; 
WP  :=  WP-1; 

WORD-.=  "S" 
END  GETWORO; 
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COMMENT   *************************************************** 
PROCEDURE  "CONVERT"  OPERATES  ON  THE  GLOBAL  VARIABLE  "WORD" 
OBTAINED  FRGM  "GETWORD."    "WORD"  IS  SCANNED  CHARACTFR  BY 
CHARACTER  TO  OBTAIN  EACH  "ROMI"  SOUND  REPRESENTATION. 
A  BINARY  SEARCH  OF  THE    ARRAY  "ROMI"  IS  CONDUCTED  Tn 
OBTAIN  THE  SOUND  CLASS  EQUIVALENT  FOP  EACH  "S3UND"  OF 
"WORD."    A  NEW  STRING*  "CODE,"  IS  GENERATED  FROM  THE  FOUR 
SOUND  DESIGNATIONS  CORRESPONDING  TO  THE  INTERNATIONAL 
PHONETIC  ALPHABET  SPELLING  OF  "WORD."    "CONVERT"  IS  ALSO 
CAPABLE  OF    EDITING  INPUT  DATA  AMD  PRINTS  OUT  A  WARNING 
LABEL  ALONG  WITH  THE  PARTICULAR  "SOUND"  REPRESENTATION 
WHICH  DID  NOT  APPEAR  IN  "ROMI"  AND  THE  "WORO"  IN  WHICH  THE 
ERROR  OCCURRED.    A  SAMPLE  OUTPUT  FROM  "CONVERT"  WHULD  BE 
"FVNSFVNN."   THE  COUNTER  " Z"  IS  ALSO  A  GLOBAL  VARIABLE, 
AND  TELLS  THE  NUMBER  OF  IPA  SOUNDS  IN  EACH  STRING  "CODE." 
**** ****************************************** *************; 

PROCEDURE  CONVERT  (STRING(36)  RESULT  CODE); 

BEGIN 

STRING(2)  SOUND; 

INTEGER  I, TEST; 

INTEGER  LISTEND,  LIST3EGIN,  POINTER; 

CODE  :=  "  "; 

BAD  :=  TRUE; 

I  :=  0; 

Z  :  ■  0  * 

WHILE  I<=WP  DO 

BEGIN 

TEST  :=  0; 

FOUND  :=  TRUE; 

SOUND:  ="  •'; 

IF  WORD  (1*1 11)-*  "-"  THEN 

BEGIN 

SOUND       :  =  WOPD  (III); 

I:=I*l;  END 

ELSE 

BEGIN 

SOUND(0| 1):=  WORD< III); 

SOUND( 111):=  W0RD(I+2l 1) ; 

I:  =  I+3 

END; 

LISTBEGIN:=  1; 
LISTEND   :=  101; 
°OINTER  :=  LISTEND; 
WHILE  (  FOUNC  )  DO 
BEGIN 

TEST  :=  TEST+l: 
IF  SOUND  <  ROMI (POINTER, 1)  THEN 

LISTEND:=  POINTER; 
IF  SOUND  >  ROMI ( POINTER, 1)  THEN 

LISTBEGIN:=  POINTER; 
IF  (  SOUND  =  ROMI  (  POINTER, 1  ))THEN 
FOUND  :=  FALSE 
ELSE 
BEGIN 

IF  (TEST  =  12  )  THEN 
BEGIN 

WRITEC'ERONEOUS    DATA", "WORD    =    ",WORD,     "SOUND    =    ", SOUND); 
FOUND    :=    FALSE; 
I     :=    WP+1; 
BAD    :=    FALSE 
END; 

°0!NTER     :=    TRUNCATE    (     (    LISTEND    ♦    LTSTBEGIN     )     /    2     ) 
END; 
END; 

CODE    (     Zll     )     :=    ROMI    (     POINTER,    2     )     (Oil    ); 
Z    :=    Z+l  ; 

IF     (BAD    =    FALSE)    THEN 
Z    :=    0; 
END 
END    CONVERT; 
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PROCEDURE  ONESOUND; 

BEGIN 

INTEGER  LISTBEGIN,  LISTEMO; 

Z  :  =  Z  -  1  * 

IF*(Z  >=  0)  AND  (BAD  =  TRUE)  THEN 

BEGIN 

Q  :»  Q  ♦  l; 

LISTBEGIN  :=  1; 

LISTEND  :=  5; 

POINTER  :=    LISTEND: 

WHILE  (CCDE(Oll)  -•=  CLASS  (POINTER))  00 

BEGIN 

IF  (CODE(Oll)  <  CLASS  (POINTER))   THEN 

LISTEND  :=  POINTER; 

IE  (CODE  (Oil)  >  CLASS  (POINTEP))  THEN 

LISTBEGIN  :=  POINTER; 

POINTER  :=  (LISTBEGIN  ♦  LISTEND)  DIV  2 

END; 

SOUNDONE  (POINTER)  :=  SOUNDONE  (POINTER) 

END 

END  CNESGUND; 
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COMMcNT   *************************************************** 
PROCEDURE  "TWOSOUNO"  DOES  4N  ANALOGOUS  OPERATION  ON  THE 
FIRST  TWO  SOUNDS  OF  A  WORD  AS  "ONES3UNC"  PERFORMED.    BY 
REMEMBERING  the  VALUE  OF  THE  LIST  "POINTED"  cRCy  "CNESOUND" 
WE  NEED  ONLY  SEARCH  THE  APPROPRIATE  PORTION  OF  "HE  AR9AY 
"SOUNDTWO"  (FIVE  ELEMENTS)  FOR  THE  SECOND  SOUND.    THE 
NUM3ER  OF  OCCURANCES  OF  EACH  COMBINATION  IS  STOREO  IN  THE 
REAL  ARRAY  "S OUNDTWOST AT . »    "TWO  COUNT"  TALLIES  THE  NUMBER 
OF  WORDS  FROM  THE  DATA  SET  WITH  TWO  OP  *ORE  SOUNDS. 

***********************************************************; 

PROCEDURE  TWOSOUND; 

BEGIN 

INTEGER    LISTBEGIN,    LISTEND; 

IF    (Z>  =    2)    THEN 

BEGIN 

TWOCCUNT  :=  TWOCOUNT  ♦  1; 

LISTBEGIN  :=  P0INTER*5-4  ; 

LISTEND  :=  LISTBEGIN  ♦  4; 

POINTER  :=  LISTEND; 

WHILE  (CODE(0|2)  --=  SOUNDTWO! POINTER M  DO 

BEGIN 

IF  (CODE  (012)  <  SOUNDTWO  (POINTER))   THEN 

LISTEND  :=  POINTER; 

IF  (C0DE(0l2)  >  SOUNDTWO  (POINTER))   tHEN 

LISTBEGIN  :=  POINTER; 

POINTER  :=  (LISTBEGIN  ♦  LISTEND)   DIV  2 

END  ; 

SOUNDTWOSTAT  (POINTER)  :=  SOUNDTWOSTAT  (POINTER)  +  1 

END; 

END  TWOSOUNO; 
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COMMENT    ************************************  *************** 

THE  OPERATION  OF  PROCEDURES  THREESGUNO  AND  FOUP- 
SOUND  IS  IDENTICAL  TO  PROCEDURE  TWOSOUND. 

REMEMBERING  THE  VALUE  OF  THE  LISTPOINTER  REQUIRES  A  SEARCH 
OF  ANLY  FIVE  ELEMENTS  FOR  EACH  SUBSEQUENT  SOUND  OF  A  STRING 
"CODE."    THE  CORRESPONDING  ARRAYS  ARE  "SOUNDTHR E ESTAT" 
AND  "SOUNDFOURSTAT."    COUNTERS  FOR  EACH  CATEGORY  OF 
LENGTH  ARE  "T HP E ECOUNT"  AND  "FOURCOUNT. " 

********************-**************************************; 

PROCEDURE  THREESOUND; 

BEGIN 

INTEGER  LISTBEGIN,  LISTEND; 

IF  (  Z>=  3  )  THEN 

BEGIN 

THREECOUNT  :=  THREECOUNT  +  1  ; 

LISTBEGIN  :  =  POINTER*5-4; 

LISTEND  :=  LISTBEGIN  +  4  ; 

POINTER  i-    LISTEND; 

WHILE  (CODE(0|3)  -«=  SOUNDTHREE  (  PO  INTER  )  )  DO 

BEGIN 

IF     (CODE(0|3)     <    SOUNDTHREE(POINTER) )     THEN 

LISTEND    :=    POINTER: 

IF     (    CODE(0|3)     >    SOUNDTHREE(POINTER) )     THEN 

LISTBEGIN    :=    POINTER; 

POINTER     :=    (LI STBEGIN+L I STEND) DI V    2 

END; 

SOUNCTHREESTAT( POINTER  )     :=    SOUNDT HREEST AT( POI NTER  ) +  1 

END; 

END  THREESOUND; 


PROCEDURE  FOURSOUND; 

BEGIN 

INTEGER  LISTEND.LISTBEGIN; 

IF  (  Z  >=  4)  THEN 

BEGIN 

FOURCOUNT  :=  FOURCOUNT  +  1; 

LISTBEGIN  :=  POINTER  *  5  -  4; 

LISTEND  :=  LISTBEGTN  +  4; 

POINTER  :=  LISTEND; 

WHILE  (CODE  (OK)  -=  SOUNDFOUR  (POINTER))  DO 

BEGIN 

IF  (CODE  (OK)  <  SOUNDFOUR  (POINTER  ))  THEN 

LISTEND  :=  POINTER; 

IF  (CODE  (OK)  >  SOUNDFOUR  (POINTER))  THEN 

LISTBEGIN  :=  POINTER; 

POINTER  :=  (LISTBEGIN  +  LISTEND)  DIV  2 

END; 

SOUNDFOURSTAT  (POINTER)  :=  SOUNDFOUR STAT  (POINTER)  ♦  1 

END; 

END  FOURSOUND; 
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PROCEDURE  ENDSOUNDONE; 

BEGIN 

INTEGER  LISTEND, LIST3EGIN; 

IF  (Z>  =  4)  AND  <BAD=TRUE)  THEN 

BEGIN 

ECOUNT  :=  ECOUNT  +  1; 

LISTBEGIN  :=  1; 

LISTEND  :=  EPOINT  :=  5  ; 

WHILE  (CODE(  Z|  1  )  -.=CL ASS  (  EPOINT  )  )DO 

BEGIN 

IF (CODE (Zl  1XCL ASS  (EPOINT)  )THEN 

LISTEND    :=    EPOINT; 

IF(CODE(Z       |  1  )>CLASS(EPOINT ) )THEN 

LISTBEGIN    :=    EPOINT; 

EPOINT     :=(LISTEND+LISTBEGIN)DIV    2 

END; 

ENDCNE(EPOINT)  :=  ENDONE ( EPOINT ) +1 

END; 

END  ENDSOUNDONE; 


PROCEOURE  ENDSOUNDTWO  ; 

BEGIN 

INTEGER  LISTEND, LISTBEGIN; 

STRINGC2)  SOUND; 

IF(Z>=5)THEN 

BEGIN 

E  1COUNT  :=  E  1COUNT  +  1; 

LISTBEGIN  :=  FP0INT*5-4; 

LISTEND  :=  EPOINT  : =  L I STBEGIN+4; 

SOUND(0| l):=CODE(Z| 1) ;SOUND(lll)  : =CODE ( Z-l I  1 ) ; 

WHI LE(S0UNO(0|2 1 -»»SOUNOTWOC  EPOINT  )  )  DO 

BEGIN 

IF(30UND(OI2XSOUNDTWO(EPOINT)  )    THEN 

LISTEND     :=    EPOINT; 

IF(SOUND(Ol 2)>S0UNDTW0(EP0INT) )     THEN 

LISTBEGIN    :=    EPOINT; 

EPOINT     :=(LISTENO+LISTBEGIN)DIV    2 

END; 

ENDTWOSTAT( EPOINT) : =ENDTWOST AT ( EPO INT ) +1 

END; 

END    ENDSOUNDTWO; 
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PROCEDURE  PRINTONE; 

8EGIN 

IOCGNTRCL  (3) ; 

WRITE  ("PERCENTAGE  OF  WORDS  WITH  FIRST  SCUND  AS  NOTED."); 

WRITE!"  ">; 

WRITE! "NUMBER    OF    WORDS     IN    SAMPLE    OF    STATED    LENGTH    IS    :"); 

WRITE(Q); 

WRITE!"    "); 

FOP  I  :=  1  UNTIL  HEADERCOUNT  CO 

WRITE  (HEADER(I)); 

WRITE("  "); 

FOR  I  :=  1  UNTIL  5  DO 

WRITECNC  ",CLASS(I  ),"     ■•)  ; 

IGCONTRCL  (2); 

WRITE("  "); 

IOCONTROL  (2); 

FOR  J  :=  1  UNTIL  5  DO 

BEGIN 

IF  (SOUNDCNE(J)  =  0  )THEN 

WRITEON(SCUNDGNE(J) ) 

ELSE 

BEGIN 

SOUNDCNE(J)     :-    SOUNDONE ( J )/Q*100 ; 

STATMUX1    (N,J)     :=    SOUNDONEU); 

WRITEON(SOUNDONE(J ) ) 

END; 

END; 

END    PR  INTONE; 


143 


PROCEDURE  PRINTTWO; 

BEGIN 

INTEGER  P; 

I3C0NTRGL  (3) ; 

WRITEC     PERCENTAGE  OF  WORDS  LONGER  THAN  ONE  SOUND  WITH 

3EGINING  TWO-SOUND  COMBINATIONS  AS  NOTED."); 

WRITEC1    "); 

WRITE! "NUMBER    OF    WORDS     IN    SAMPLE    OF    STATED    LENGTH    IS    :»); 

WRITE(TWOCOUNT) ; 

WRITEC    "); 

FOR  I  :=  1  UNTIL  HEADERCOUNT  DO 

WRITE  (HEADER(D); 

WRITEC  "); 

FOR  K  :=  1  UNTIL  5  DO 

BEGIN 

IOC3NTRCL  (2); 

FOR  L  :=  4  STEP  -1  UNTIL  0  DO 

BEGIN 

WRITEONC  MtSOUNDTWO(K*5-L)  ,  ■     " )  ; 

END; 

IOCONTROL  (2)  ; 

WRITEC  "); 

IOCONTROL  (2)  ; 

FOR  M  :=  4  STEP  -1  UNTIL  0  DO 

BEGIN 

P  :  =  k* 5— M * 

IF*("S0UNDTW0STAT(P)  =  0)  THEN 

WRITE0N(S0UNDTW3STATO  ) 

ELSE 

BEGIN 

SOUNDTWOSTAT( P)     :=    ( SOUNDTWOST AT ( P ) /TWCCOUNT ) *  100  ; 

VECTW0(5-M)     :  =    VECTW0(5-M)     ♦    SOUNDTWOST AT ( P ) ; 

WRITEON(SOUNDTWOSTAT(P ) ) 

END; 

END; 

END; 

WRITEC    "); 

WRITE    c   ")    ; 

IOCONTROL    (2)     ; 

WRITEC "ANALYSIS    OF    SECOND    SOUND    AS    THE    PERCENTAGE    OF"); 

WRITECOCCURANCE    IN    THE    SECOND    POSITION."); 

WRITEC    "); 

IOCONTROL    (2)     ; 

FOR    J    :=    1    UNTIL    5    DO 

WRITECN(VECTWO( J) ) 

END    PRINTTWO; 
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PROCEDURE  PRINTTHREE; 

BEGIN 

INTEGER  P; 

IOCONTROL  (3)  ; 

WRITEC       PERCENTAGE    OF    WORDS    LONGER    THAN    TWO    SOUNDS    WITH 

BEGINING    THREE-SOUND   COMBINATIONS    AS    NOTED."); 

WRITEC    "); 

WRITECNUMBER    OF    WOSDS    IN    SAMPLE    OF    STATED    LENGTH    IS    :"); 

WRITE(THREECOUNT); 

W  R I  T  E  (  "    " ) ; 

FOR    I     :=    1    UNTIL    HFADERCCUMT    DC 

WRITE    (HEADER( I) ); 

WRITEC    "  ); 

FOR    I     :=    1    UNTIL    25    DO 

BEGIN 

IOCONTROL    (2); 

FOR    J    :=    4    STEP    -1    UNTIL    0    DO 

WRITEONC  ",SOUNOTHREE(I*5-J) ,"  "); 

IOCONTRCL    (2); 

WRITEC    "J  ; 

IOC^NTRCL    (2) ; 

FOR    M    :=   4    STEP    -1    UNTIL    0    DC 

BEGIN 

P    :=    I*5-M; 

IP(SOUNCTHREESTAT( P)     =    01    THEN 

WRITEON(SCUNDTHREESTAT(P) ) 

ELSE 

BEGIN 

SOUNCTHREESTAT(P)     :=    ( SCUNDTHREESTAT ( P ) 

/THREECCUNT)*100; 

VECTH*EE(5-M)     :=    VECTHREE  (  5-M  )    ♦    SOUNDTHREEST AT ( P ) ; 

WRIT  EON <SOUNDTHREESTAT( P)  ) 

END; 

END; 

IOCONTROL    (2) ; 

WRITEC    ") 

END; 

WRITEC    "); 

WRITEC    "); 

IOCONTROL    (2)     ; 

WRITEC'ANALYSIS    OF    THIRD    SOUND    AS    TO    THE    PERCENTAGE    OF"); 

WRITEC'OCCURANCE    IN    THE    THIRD    POSITION."); 

WRITEC    "); 

IOCONTROL    (2)     ; 

FOR    K    ;=    1    UNTIL    5    DO 

WRITEON     (VECTHOEE(K) ) 

END    PRINTTHREE; 
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PROCEDURE    PRINTFOUR; 

BEGIN 

INTEGER  P; 

IOCONTROL  (3); 

WRITEC'PERCENTAGE    OF    WORDS    LONGER    THAN    THREE    SOUNDS    WITH 

BEGINING    FOUR-SOUN'D    COMBINATIONS    AS    NOTED."); 

WR I T  E     ( "    " )  * 

WRITEt "NUMBER    OF    WORDc     IN    SAMPLE    OF    STATED    LENGTH    IS    : "  )  ; 

WRITE(FCURCOUNT)  ; 

WRI TE ( "  " ) * 

FOR  I  :=  l'uNTIL  HEADERCOUNT  DO 

WRITE  (HEADER(D); 

WRITC  {"  "  )  * 

FOR  I  :=  1  UNTIL  125  DO 

BEGIN  IOCONTROL  (2); 

FOR  M  :=  4-  STEP  -1  UNTIL  0  DO 

BEGIN 

P     *  =     I     a    5    —     v  • 

IF*  ("SOUNDFOURST AT    (P)     =    0    )    THEN 

ELSE 

BEGIN 

SOUNDFOURST AT  (P)  :=  { SOUNDFOURST AT  (P)  /  FOURCOUNT  )  *  100; 

WRITE(SOUNDFOUR( P) t SOUNDcOURSTAT ( P) ) ; 

WRI  TEC  '•) 

END; 

END; 

END; 

END  PRINTFOUR ; 


PROCEDURE  PRINTEND; 

BEGIN 

IOCONTROL  ( 3) ; 

WRITE  <"  PERCENTAGE  IF     WORDS  WITH  LAST   SOUND  AS  NOTED.") 

WRI  T  £  (  •*     HI • 

WRITEC'NUMBER    OF    WGRDS     IN    SAMPLE    OF    STATED    LENGTH    IS    : " ) ; 

WRITE(ECOUNT ) ; 

WRI Tc ( "  " I  * 

FOR  I  :=  l'uNTIL  HEADERCOUNT  DO 

WRITE(HEADER( I ) ) ; 

WRITEt"    "); 

FOR    I    :=    1    UNTIL    5    DO 

WRITEONC  "f  CLASS  (  lit"  "); 

IOCONTROL    (2); 

WRI  TEC1    "); 

I0C3NTPCL    (2); 

FOR    J    :=    1    UNTIL    5    DO 

BEGIN 

IF( 5NDCNE(J)=0)    THEN 

WRITEON(ENDONE( J)) 

ELSE 

BEGIN 

ENDONE(J)     :=    ENDONE ( J ) /EC0UNT*100 

WRITECN(ENDONE( J) ) 

END; 

END; 

END    PRINTEND; 
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PROCEDURE    PRINTENDTrfO; 

BEGIN 

INTEGER  P; 

IOCONTPQL  (3); 

WRITEC  PERCENTAGE    OF    WORDS    LONGER    THAN    ONE    SOUND    WITH 

ENDING         TWO    SOUND    COMBINATIONS    AS    NOTED."); 

WRI T  E ( "    "  )  * 

WRITEC'NUMBER    OF    WORDS     IN    SAMPLE    OF    STATED    LENGTH    IS    :"); 

WRITE(E.ICOUNT)  ; 

W  R I  T  E  (  "   )  " 

FOR  I  :=  l'uNTIL  HEADERCOUNT  DO 

WRITE(HEA.DER(  I)  )  ; 

WRITEC  "); 

FOR  K  :=  1  UNTIL  5  DC 

BEGIN 

IOCCNTPCL  (2); 

FOR  L  :=  4  STEP  -1  UNTIL  0  DO 

BEGIN 

WRITECNC  %SOUNDTWO(K*5-L)  ,"     "); 

END; 

IOCGNTROL  (2); 

WRITE("  "); 

IOCONTROL  (2)  ; 

FOR  M  :=  4-  STEP  -1  UNTIL  0  DO 

BEGIN 

IF*  {ENDTWOS'TAT       (O)    =    0)     THEN 

WRITEON(ENDTWOSTAT       (P)) 

ELSE 

BEGIN 

ENDTWOSTAT(P)     :  =    ( ENDTWOSTAT { P ) / E    1C0UNT)*100; 

ENDVEC2(5-M):=ENDVEC2(  5-M ) +ENDTWO?TAT< P ) ; 

WPITEON(ENDTW0STAT(P) ) 

END; 

END; 

END; 

W  R I  T  E  (  "    " )  * 

WRIT E( "ANALYSIS    OF    NEXT    TO    LAST    SCUNO    AS    to    the    PERCENTAGE") 

WRITEC'OF    OCCURANCE    IN    THAT    POSITION."); 

WRITEi"    "); 

IOCONTRGL    (2)  ; 

FOP    J    :=    1    UNTIL    5    DO 

WRITE0N(ENDVEC2( J)  ) 

END    PRINTENDTWO  ; 
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PROCEDURE  PRINTMUXl; 

BEGIN 

FOR  S  :=  1  UNTIL  5  DC 

BEGIN 

F?R~R  :=  1  UNTIL  N  DO 

BEGIN 

B  :-    B  +  STATMUX1(R,S) 

END; 

FOR  T  :=  1  UNTIL  N  DO 

BEGIN 

PMUX1(S,T)  :=  <ST*TMUX1(T,S)/B> ; 

END; 

END; 

WRIT  EC  " ); 

WRITE!"  "); 

IOCONTROL  (3) ; 

I0C3NTR0L  (2) ; 

WRITE  <"    PROBABILITY  MATRIX  FOR  FIRST  SOUNDS 

WRITE  ("  ") ; 

IOCONTROL  (2); 

FOR  I  : =  1  UNTIL  5  DO 

BEGIN 

WRITEON  ("        wfCLASS<I>,"        ") 

END; 

IOCONTROL  (2) ; 

WRITE  ("  " ) ; 

IOCONTROL  (2) ; 

FOR  K  :=  1  UNTIL  5  DO 

BEGIN 

IOCONTROL  (2) ; 

WRITE  ("  ") ; 

WRITE  (••  «)  ; 

IOCONTROL  (2); 

FOR  J  :=  1  UNTIL  N  DO 

BEGIN 

WRITECN  (PMUXKJtKI) 

END; 

END; 

END  PRINTMUXl; 
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Pt  s 


=  1  UNTIL  5  DO 


I) 


(I 
1 


=  o  ; 

:=  0  ; 

:=  0; 
:=  0; 
=  c; 
)  :=  0; 

UNTIL  5 


PROCEDURE  CLEARMEM; 

BEGIN 

INTEGER 

P  :=  0; 

S  :=  0; 

T  :=  0 

FOR  I 

BEGIN 

VECTWO(I) 

VECTHREE( 

VECFOUR  (I) 

ENCVEC2(I) 

ENDGNE (I > 

SOUNCCNE 

FOR  J  := 

BEGIN 

P  :=  P  + 

ENDTWCSTA 

SOUNDTfcCSTAT  (P) 

FOR  K  :=  1  UNTIL  5 

BEGIN 

S  :=  5  +  1; 

SOUNDTHREESTAT  <S) 

FOR  L  : =  1  UNTIL  5 

BEGIN 

T  :*  T  +  i? 

SQUNDFOURSTAT 

END; 
END; 
END; 
END; 
END  CLE^RMEM; 


DO 


(P)  :=  0 


o; 

DO 


:=  0 

DO 


(T)  :=  0 
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:  = 

licit  • 

j  = 

»»N" ; 

;  s 

up  n  • 

:  = 

"  S  "  1 

:  = 

"V" ; 

CLASS    (1) 

CLASS     (2) 

CLASS     (3) 

CLASS     (4) 

CLASS     (5) 

GENFRATPTWO; 

GENERATETHPEE; 

GENERATEFCUR; 

GETARRAY; 

N    :=    1; 

WHILE    (    N   >    0)    DO 

BEGIN 

IOCONTRGL    (3); 

INITIALIZE; 

CLE*RMEM; 

WHILE     (GETWORD 

BEGIN 

CONVERT    (COOE) 

ONESOUND; 

TWO  SOUND; 

THREESOUND; 

FOURSOUNO; 

ENDSCUNDCME; 

ENDSOUNCTWO 

END; 

PRINTONE; 

PRINTTWO; 

PRINTTHREE; 

PRINTFOL'R; 

PRINTENC; 

PRINTENDTWO; 

READ    (N) 

END; 

N    :=    5; 

PRINTMUX1 

END. 


(WOPD))     DO 


COMMENT***************************************************** 

ROMI    MUST    ALWAYS    BE    THE    FIRST    CATA    SET    FOLLOWING    THE    "SDATA" 

CARD    (JCL). 

NOTE    THAT    ROMI     IS    WRITTEN    SUCH    THAT    EACH    CHARACTER    OF    ROMI 

IS    FOLLOWED    IMMEDIATELY     (SEPARATED    BY    ONE    SPACE)     BY    THE 

CATEGORY    TQ    WHICH    IT    BELONGS,       TWO    LETTERS    JOINED    BY    A    ■-■ 

ARE    READ    AS    A    SINGLE    LETTER. 
***********************************************************  ; 
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************************************************************ 

COMPUTER         PROGRAM      NUM.8  FS    2 
***************************  ********************************* 


//CHOK8    JOB     (0405, 1404, MA52) ,' SMC    2737»,TIMP=5 

//    EXCC    ALG0LW,RECIPN=350K 

//SYSPRINT    DD    SYS^UT=A,DCB=BLKSIZc=665,SPACF=f CYL,(3,1 M 

//ALGOL. SYSIN    DO    * 

SALGPL    T=300,P=?00 

SNOLIST 


B^GTN 

COMMPNT 

*************  ********************************  *************** 

************************************************************ 

FINAL  PROGRAM  OUTLINE: 

1.  DIMC|\jciom    AREA 

2.  PROCEDURE     INITIALIZE 

3.  "  S'rTCOUNT 

4.  "  GENERATETWH 

5.  "  GENERATETHRCF 

6.  "  GFNPRATEFOUR 

7.  •♦  GENERATSSIX 

8.  "  G^TA^AY 

9.  LOGICAL    PROCEDURE    GETW^PQ 

10.  PROCEDURE    CONVERT 

11.  "  PROS    TWO 

12.  "  DECIDE 

(INCLUDES     OATHS    FIR    1,2,3,4,5,6,     SOUND    WPRD*) 

13.  n  COMPJTE     NORM 

14.  "  RAW_*MALYSIS 

(INCLUDES     PATHS    e?Q     1,2,3,4,5,6,     SOUND    WORDS) 

15'  "  COMOjr=_&NY 

16  "  CLPARM=M 

17  ■  FINDSPUND 

18  "  ONFSDUND 

19  »  GRAPH 
20.    MAIN  PROGRAM 

********************************************* ********* ****** 
************************************************************ 
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COMMENT    INPUT 
BETWEEN    WORDS. 
WODO    VUST    START 


DATA    WRITTEN 
AMD    END    ON 


IN    "ROMI" 
SAMP    CARD 


WITH    AT    LEAST    HNE     BLANK 


INTE 
INTC 
PROC 
B^GT 

comm 

INTE 
INTE 
INTE 
INTE 
INTc 

STRI 
STRI 
LOGI 
STRI 
STRI 
STRI 
STRI 
STRI 
STRI 
STPI 
STRI 
REAL 
REAL 
RE  AL 
REAL 
pEAL 


GER 

GEP 

EDUR 

N 

ENT 

GEP 
GER 
GER 
GER 
GER 
NG 
NG 
CAL 
NG 

NG(6 

NG  (6 

NG  (6 

NG  (6 

NG  (6 

NG<6 

NG     ( 

ARR 

ARR 

APR 

APR 

ARR 


DIM; 

SAMPLES  IZ^ 
E    DUMMY; 


REAL    ARPAV 


P^AL    APR 
REAL    APR 


*****    g 

TW0P3IN 
INDEX, 
FOURPOI 
THPEEPO 

n; 

PO)     T«=X 
36)     WOR 

FOUND, 
2)  ARRA 
)  ARRAY 
ARP  AY 
ARRAY 
AR°  AY 
ARRAY 
ARRAY 
PO)  ARP 
AY  ON  El 
ON^T 
nMFT 
Ec?6 
ONET 
ONFT 

OMcT 
Fl  2C 

ONET 
ALLS 


LOPAL  DECLARATIONS 

T,^NEo0!NTT<:pfiCF; 
PPINTPR,     Z,TP,     WP, 

NjT; 

INT: 


HEi^cOUNT,     poqint,     NUMBCP 


,    CODE; 


AY 
AY 
AY 
AY 


O 

BA^ 

Y    RO*!     (  1  :  :  101  .1 : :2)  ; 

CLASS( 3  ::3)  ; 

SnuNOTWOlO: :15>  : 

SOU^DTHRFE( 0: :63) ; 

S0UMDF0UR(3  :  :?55)  : 

SnuMDFlVc(0: :1023) : 

SPUMOS!  X(0:  :4095)  ; 
AY    hpa^fp    (  '  :  :  10)  : 

,0MF?,DNc3,n^E4,ONEc,ON<=6,E6     ( 3 : :4,0 
WH2  ,  ONETWH3,  nN.cT.VH4,  0NCTWH5  (">:  :  16.0: 


AY 

AY 


WO*, =!RSTLAST5,F!2STLAST6  13::16,0 
( 0::15,0: :DIM); 

W0^3 ,0NETWD'4,0NETW03  5, 
W°3M  0:  :64,0:  :DIM)  ; 
W03^^,3NcTw?345,0NCTW0  3A6, 
E26( 0: : 256,0: :DI^) ; 
W03^E6,nMCTWn34F5(0: : 1024,0: :  D  I  m  ) 
OUND (0: :4  09S ,0: :DTM) ; 


:^IM) 
niM)  : 

:D!M) ; 
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COMMENT       ******************  ********************************* 
PROCEDURE    INITIALIZE    RESETS    THE    VALUES    OF    TH^     GLOBAL 
COUNTERS    USED    THROUGHOUT    THE    PPD3RAM.        INITIALIZE    ALSn    READS 
AMD    PRINTS    THE    DATA    SET     IDENTIFIER     "HEADER,"     SITING 
hjpXt    POINTER,"     «to,ii    to    £0    CAUSES    THE     PPnccD'JRP    GE^WORQ 
TH    READ    THE    PPST    DAT*    C&PO. 

***  ^*** ***************************************** *********** • 


COMMENT  *********** *********** 

HEADEPCOUNT     TS    THC    MU^BEP    OF    CARDS    PPFCFEDIMG    ' 

WHICH    DESCRIBE    THE    TYPE  /OU  ALITY/ET .     OF    THE    DA 

NOT    TO    BE    READ    AS    PA'T    QF    THE    !?ATA. 

****************************** 


MP  DATA 
*A  BUT  APF 


PROCEDURE  INITIALIZE: 

BEGIN 

INDEX:=0; 

READ  (HEADCOUMT): 

POP     I     :=    1    UNTIL    HEADCOUNT 

BEGIN 

HEADEP (I)     :  =    "    "; 

REAnCARD(HEADEP(  I)  ): 

END: 

IOCONTPOL    (2): 

writec    "); 

IOCONTPOL    i?.); 

tp    :=    80 

END     INITIALIZE; 


DO 


PROCFDU 
BEGIN 

Fno     j     : 

BEGIN 

ONEl (4, 

0NC2(4, 

0NC3(4, 

0NE4(4, 

ONE  5(4, 

0NC6(4, 

EM*, I  ) 

ONPTW02 

ONETW03 

0NETW04 

ONpTVjn5 

ONFTW06 

FIRSTLA 

FIPSTLA 

EE26(16 

0NCTW03 

0NETW03 

ONETW03 

ON»=twO^ 

0NETW03 

ONFTW03 

ONETW03 

F12EF26 

ONE TWO 3 

0NETW03 

ALLSOUN 

END: 

ENO    SET 


RE    SETCGUNT; 

=    1    UNTIL    DIM    DO 

I)  :=0; 

I ) :  =  0 ; 

I)  :  =  0: 

I) :=0; 

I):=0; 

I):=0; 

:=0: 

(16, 

(16, 

I  16, 

(16, 

(  16, 

ST5( 16,1)  :  =  0 

ST6( 16  ,1)  :  =  D 

,I):=0; 

M64,I  1:=0; 

4(64,1 ) :=o; 

5(64,1 ) :=0; 

6(64,1 ) :=0: 

44(256,I):=0; 

45(?56,I  ):=0; 

46(256,1) :=0; 

(256,1 ):=0; 

4E6( 1024,1) :=0; 

4E5( 1024TI):=0; 

D(4096,I  I  :=0; 

COUNT; 


I) 

:=0; 

I) 

:  =  0; 

I) 

:=0; 

I) 

:=0; 

I)  ! 

:  =  0; 

16 

ill: 

16 

,1)  : 

=  0 
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COMMENT  *************  ************************************** 

PROCFDURF    GENEPAT^TWO    °ROVIOES    TH<=    16    TWP-SO'J^D    CLASS    LA6CL 
DESIGNATIONS     IN    ALPHABETICAL    ORDER.        THES  =    LABCLS    ARC 
STORED     IN    THF    ONE    DIMENSION    AR"AY    "SOUNDTWO."       ■''HE    LABELS 
CORRESPOND    TO    THE    15    ROWS    ^    THE    SCT    OF    REAL     APPAYS    NAMEH 
"ONcTWO_"t"FIPSTLaST    "  »     AMP    ""2^." 
***********************************************************; 


PROCEDURE  GENFPATctWo: 

BEGIN 

INTEGER  Y; 

Y  :=  0; 

FOP  I  := 

0  UNTIL  3 

DO 

BEGIN 

POR  J  := 

0  UNTIL  3 

DO 

BEGIN 

SCUNDTWO(Y)  :=  "  " 

» 

SOUNDTWO 

(Y) (0  1) 

LASS 

CIMOJ 

i) 

SOUNDTWO 

(Y>(  l|  1) 

LASS 

( j)(oj 

i) 

Y  :=  Y  + 

1 

END; 

END; 

END  GENFRATPTwn; 

COMMENT   ****************** ********************************* 

PROCEDURE  G^NPRATFTHRcc  TAKES  THC  15  CLEMENT  IRR&v 

"SPUNPTWO"  AND  PFMERA"<"ES  tHF   6^-  POSSIBLE  CPMB  tnja  tIPNS  p«= 

THE  FIRST  THREE  SOUNDS  OF  A  WORD  IN  ALPHABETICAL  PPn<=P. 

THE   64  C[_cMcmts  4RC  ^TOPED  IN  THE  ONE  PT'EN^  T  ONA  L  ADDAY 

"SPUNDTHREE"  AND  APE  USED  AS  LABELS  POP  THr   54  ROWS  OF  THE 

SET  OF  RFAL  ARRAYS  "PMETW03  . " 

*************  ****^-***  ******  5***************4**  *************  : 


PROC 
BEGI 
INTE 

Y  :  = 
FOR 
BEGI 
FOR 
BEG  I 
SOUN 
SOUN 
SOUN 

Y  :  = 
ENP; 
END; 
END 


EDUR 

N 

GER 

0; 
I  :  = 
N 

J  :  = 
N 

DTHR 
DTHP 
DTHR 

YM 


E    GENEPAT«=TH9FC; 
Y; 

0    UNTIL    15    DO 

0    UNTIL    3    DO 

EE(Y)     :=    "    "; 

EE(Y)<0|?)     :=    SOUNOTWOf  I  )  (0!  2)  ; 

EE(Y) (211)     :=    CLASS( J) ( Dl  1)  ; 


GENERATETHREE; 


PROC 
BEGI 
INTE 

Y  :  = 
FOR 
BCGI 
t=OR 
BEGI 
SOUN 
SOUN 
SOUN 

Y  :  = 
ENP: 
END; 
END 


ED 

M 

GE 

0; 

I 

N 

J 

N 

DF 

Pf= 

DP 
Y 


UPE  GENERATEFDUR: 

R  Y; 

:=  0  UNTIL  63  DP 

:=  0  UNTIL  3  30 

OUP(Y):="  ": 

PUR(Y)(0l3)  t=  SHUNDTHR^d  )  (Dl  3)  ; 

OUR(Y) (3ll):=:LASS(J)(0|l): 

♦  1 


PPNERATE»=PUR; 
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PROCEDURE  GEME»ATPS!X; 

BCGIN 

INTCG*=R  XTY; 

Y  :=  0: 

X  :  —    —  1  * 

FQP  I:=6  UNTIL  255  DO 

BEGIN 

FOR  J  : =  0  UNTIL  *  DO 

BEGIN 

X  '  - X+  1  * 

SOUMDFIVF(X)  :='•  ": 

SOUNDFIVE(X)  (  0!4):=SOJNDFOUR(I  )  (OK)  ; 

SOUNDFIVE(X) (4|l):=CLASS(J)(0ll); 

FOR  K  :=  0  UNTIL  3  DO 

BEGIN 

SOUNDSIX(Y) :="  "; 

SOUNDS  I X(Y)  (015)  :=SOUNDFIVE (X) (0| 5) ; 

SOUNOSIX(Y) (5!1):=CLASS(KM0|1); 

Y:=Y+1 

END; 

END: 

ENP; 

END  GENERATESIX; 

£r)MMcN  J    *************************************************** 

PROCEDURE  GETAROAV  OEAOS  IM  the  101  CHARACTERS  USED  BY  ^HIS 
PROGRAM  TO  REPRESCNT  thF  INTERNATIONAL  PHOMcTir  ALPHABET. 
EACH  SOUND  R CPR CSENT A T I  ON  IS  PLACED  IN  A  TW"»  COLUMN  ARP  AY 
"ROMI."    COLUMN  ONE  IS  THC  SOUND  RFPRF SENT  AT  I  ON  AND  COLUMN 
TWO  C0NTAINS  THE  CLASS:  EITHER  NASALt  PpICATIVP,  STnPf  HR 
VOWEL.    THE  NUMBER  OF  CA*?DS  USED  TO  REAP  IN  "QOMI"  CANNOT 
BE  VARIED  WITHOUT  ALT=R!NG  THE  PROGRAM,    the  Ni'MBER  OP 
ELEMENTS  IN  "ROMI"  IS  NOT  VARIABLE.    "POMTit  Is  ppjMTFn  OUT 
A  CARD  AT  A  TIME,  JUST  AS  IT  T S  TYPCQ  m    tmc  OATA  CAPOS. 

***************************  ********************************; 

OROCFDUPF  GCTARRAY; 

BEGIN 

STPINGI811  PHONOL; 

INTEGER  B,A; 

B:  =  l  ; 

A  :=  1  : 

WHILE  (A  <=  2  7)  DO 

BpGTN 

PHONCL  :=  "  " ; 

READCARD  (PHONOL); 

Tp:=0; 

WHTL^CTP  <=  79)D0 

BEGIN 

WHTLC  (PHONOL  (TPI1)  ="  ")  AND  (TO<=7°)  DO 

tp:=  TDfl; 

IF  (  Tp  -,=  80  )  THEN 

BEGIN 

IF  (PHONOL  (TP  +  1  |1  )-.  =  ••-")  THEN 

BEGIN 

ROMI  (B,l):  =  PHONOL  ( TP  1 1 )  ; 

td:  =  jp  +  ->i 

END 

ELS* 

BEGIN 

ROMI  ( Bt 1) CO!  1) :  =  OHONOL  (TP|1); 

ROMI  (P,l)(l|l):  =  PHONOL  (TP+211); 

TP: -TP+4; 

END; 

ROMI  (6,2):  =  PHONOL  (TP|1); 

B:  =  R«-l  ; 

TP  :=  TP+1 

END 

ELSE 

A  :=  A+l; 

END 
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PND; 

TP     :=    80 

END    GFTAPPAY: 
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COMMENT  ************************  ****  A*******  ******  **  *  ****** 

LOGICAL     PRGCFOURc    G<=TWnRD    READS    THE     INPUT    ">ATA    WP  TTt^nj    cm 
"RPMI"     TNTT    A     PUFFER    CALLED    "TFXTt"    ONc    CARD    AT    A    TIME     AND 
PCHG    PRINTS    EACH    CA^D    WITH    A     SEQUENTIAL    NUMRE°     IDENTIFIER 
"INHEX."  THE    RUFF«=3,     "TEXT,"     IS    SCANNED    ONE     rHARACT=P     AT 

A    TIME    UNTIL     A    "WOPD"     IS    BUTLT.       LFAOING    ANO    TRAILING 
BLANKS    DELIMIT    A    "WORD."  "WORD"     IS    the    GLOBAL     PARAM=tep 

OF    STRING    TYPE    Op    MAXIMUM    LENGTH    Pc    36    cHARA~TPRS    WHITH 
IS    DELIVERED    TO    THE    MAIN    PPOGPAM    AND    SUPSEQUCNT    PROCFDUR^S. 
WHEN    THE    CHARACTER    "*"     IS     -NCOUNTEREH    ON    A    DATA    CARD    IM 
OTHcR    THAN    CARD    COLJMN     1    THE    LOGICAL    VALUC    OP     "GETWPRD"     IS 
SET    TO    PALSE    THUS    SIGNALLING    THE     END    OF    A    DAM    SET. 
"WORDS"    MUST    STAPT    AND    END    PN    THE    SAMC    CARD. 

*************************************** ^****ft**** **********; 

LOGICAL    PROCEDURc    GETWOPO    (STPING(36)    PESULT    WORD); 

BEGIN 

WP    :=    0: 

IF(TP=90)    THEN 

BEGIN 

INDEX:=!NDEX4-l: 

READCAPD    (TEXT)  ; 
TP:=0 
END; 

WHILP(TEXT(TP | 1 )="    ")        0^ 
BEGIM 
TP:=^P^1 ; 
IF     (TP=PO)     THEN 
BEGIN 

RF ADCA°D    ( TnyT) : 
INDEX:  =  INDEXM ; 
TP:=0 

PNH 

END; 

N  OP  D  ; =  "    "  * 

WHILE  (Tp<80)  AND  (  TEX  T  (  TP  !  1  )  ^="  •• )  DO 
BEGIN 

WORD  (WPl 1) ; =  TEXT(TD| 1 ); 
WP  :=  wp  +  1; 
jo  :=  JP  +  1 
END; 

WP  : =  WP-1; 
woRn-is""*" 

END  GETW0PD; 
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COMMENT         *****  *  **  *****  ******  **  *********  ***  **  ***********  ****i 

RROCEDUPF    "CONVERT"    OPERATES    ONI    THE    GLOBAL    VARIABLC    "WORD" 
OBTAINED    FROM    "GETWORO."  "WORD"     IS     SCANNFD    CHARACTCP     BY 

CHARACTFR    TO    OBTAIN    EACH    "RpMT"    SOUND    RE  PP«=SENTAT  ION. 
A    BTNJAPY    SEARCH    OP    THE     ARPAY    "POMI"    IS    CONDUCTED    Tq 
OBTAIN    THE    SOUNO    CLASS    EQUIVALENT     FOR     EACH    "SOUND"    n- 
"WHPO."  A    NEW    STRING,     "CODE,"     IS    GENERATED    PROM    THE    POUR 

SOUND    DESIGNATIONS    30R  P  ESP1NDI  NG    Tn    THE    I  NTEPN  AT  I  PNAL 
PHONETIC    ALPHABET    SPELLING    OF    "WORD."  "CONVERT"    IS    ALSO 

CAPABLE    OP    EDITING    I^PUT    data    A^n    prints    OUT    A    WARNING 
LABEL    ALONG    WITH    th  =    PARTICULAR     "SOUND"    PCPR  =  s cnt AT  ton 
WHICH    DID    NOT     APPEAR    IN    "ROMI"    AND    TH!=     "WlRn»     IN    WHICH    THC 
ERROR    OCCURRED.  A    SADDLE     OUTPUT    PROM    "CPNVCRT"    WOULD    BE 

"FVNSFVNN."       THE    COUNTER    "Z"     IS    ALSO    A    GLOBAL    VART&BLC, 
AND    TELLS    THE    NUMR-EP    OP     IPA    SOUNDS    IN    EACH    ^T«?ING    "C^PE." 
"Z"     IS    USED    TO    DRIVE    LATCR    PORTIONS    np    THE    PROGRAM. 
IF     A    MISTAKE     IS    MADF    "N    A    DATA    CAPD    SUCH    THAT     A    CHARACTER 
STRING    IS    FOUND    that    IS    NOr    A    ME«BF°    OF    POMJ,     THE     "WORD" 
CONTAINING    THC    UNKNOWN    "SHUMD"     IS    PRINTED    PUT     ALPMG    WITH 
AN    ERROR    MESSAGE.       WHEN    THIS    CONOITIPN    ApTS<=s,     "BAH"    IS     SET 
T0    FALSE    AND    W     ANALYSIS    IS    DONc    ON    th^    "COOP"    PY    THE 
REMAINDFR    OF    THE    PRPGRAm. 
***********************************************************: 

PROCEDURE    CONVFRT    (STPINGH6)    RESULT    CODE): 

BEGIN 

STRING (2)  SOUND; 

INTEGFR  I, TEST; 

INTEGER  LISTEND,  LIST8CGIN,  POINTER; 

CPPE  :=  "  "; 

BAD  :=  TPUC; 

I  :=  0; 

Z  :=  0; 

WHILE  K=WP  DO 

BEGIN 

TEST  :=  0; 

FOUND  :=  trup: 

SOUNO: ="  "; 

IF  WORD  (1*1! 1)-=  "-"  THEN 

BEGIN 

SOUND       :  =  WORD  (III); 

I: =I*1;  END 

ELSE 

BCGIN 

SOUND(Oll): =  WORD( III): 

SOUND( ill) :=  WORD( I«-2| 1 ) ; 

I: =1+3 

END; 

LISTBEGIN:=  1; 
LISTEND   :=  101; 
POINTFP  :=  LISTENS; 
WHILE  (  FOUND  )  D^ 
BPGIN 

TEST  :=  TEST+1; 
IF  SOUND  <  POMI (POIMTER t  1)  THEN 

LISTEND:=  POIMTPR ; 
T<=  SOUND  >  RHMI  (  POINTER,  1  )  THEN 

LISTBFGIN:=  POINTER; 
Ic  (  SOUND  =  ROMI  (  POINTER. 1  ))TH^N 
FOUND  :=  FALSE 
ELSE 
8PGIM 

IP  (TEST  =  12  )  TUCM 
BPGIN 

WRITE( INDEX,TCXT): 

WRITF("EPPNEPUS  DATA", "WORD  =  ",WORP,  "SOU^D  = 
FOUND  :=  FALSE; 
I  :=  W°+l; 
BAD  :=  FALSE 
ENP; 
POINTER  :=  TRUNCATE  (  (  LISTEND  ♦  LISTBEGIN  )  /  2  ) 
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END ; 

FNO; 

COPE     (     Zll     )     :=    ROMI    (     Pni\|TPR,     ?    )     (oil    ); 

Z    :=    Z  +  l  : 

IF     (BAD    =    FALSF)     TH5N 

Z    :=    I 

EN^; 

Z    :=    Z-l 

END    CONVERT; 
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COMMEN 
PROCFD 
(PP'  S) 
CORRES 
ARGUPM 
IF.  R 
SOUND 
?)  PF 
"CONDI 

3)  PF 
RE  ASS 
BASE. 

4)  LC 

5)  FN 

NUMBER 

****** 


-r**** 

UPF  P 
.  TH 
PONDI 
ENTS 
FAL  A 
C^MBI 
AL  AR 
TTCNA 
AL  AD 
INGED 


******* 
ROP_TW"» 
F  PP'S, 
NG  BASF 
ARE: 
RPAY  Bfi 
NATION 
RAY  PAP 
L"  PORT 
RAY  OUT 
.         OUTD 


:       THE    NUMBF 

ID:       THF    NUM 

OP    ELEMENTS 
************ 


****************************************** 

CftLCULATFS    THE     PROB ABTLI ST  I  0    PROGRESSIONS 
WHFN    CALfULATFOr     ARF    P>=ASSIGNFD    TO    THF 
DATA    CRFOUENCIES    ARRAYS.       THE    CALLING 

SF:       CORRcSPONDS    T0    THF    CU^MULA^IVE 

FO*     WHICH    thc    PP    IS     BEING    r,  ALTUl  A^fo. 

TPROB:        THE    ARRAY    CONTAINTNJG    THP 

I3NJ    OF    THE    PP. 

njT:        THC     AO^AY    TO    WHICH    THF     PP'S    ARC    TO 

UT    MUST    BE    OIMFNSIONFD    !DCNTICALLY    WITH 

P    OF    FLFMFNTS    IN    &ARTPROB    LESS     ONE. 
Rco     nF     pLpMcmTS     IM     RaSp    DT7IDFD    BY    THC 
IN     DAPT    ppHB    LCSS    ONE. 

*********  *******************  *************; 


PRO 
(*, 

BEG 
RFA 
INT 
T  : 
FOR 
6FG 
FOR 
BCG 
B  : 
T  : 
FOR 
B  : 
FOR 
BEG 
IF( 
OUT 
PLS 
OUT 
END 
END 
FNin 
END 


CFDURE    PROB    TWO(REAL     ARRAY    RASP ( *, *  )  :RC *L    AR°aY    dcptprhb 

*);REAL    ARRA"Y    nUTP JT {* f* );  INTEGER     VALUE    LCPNIO); 

IN 

L   B; 

FG<=R    TtP; 

=  -1  : 

H    :=    0    UNTIL    LC    DO 
IN 

I    :=   0    Until    FNID    no 
IN 

=    0; 
=  T«-i    ; 

J  :=  1  UNTIL  NUMBCR  DO 
=  B  +  BASF(T » J)*P&RTPRnn(H t j)  ; 

K  : =  1  UNTIL  NUMBF P  DO 
IN 
B-,=  0)  thpm 

PUT(TtK)  :=  BASEfT, K )*PARTPROB(HTK) /R 

c 

PUT(TtO) :=-! 


PROB.TWO; 
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C  OMMENT *******  *  ***************************  ************  ****** 

PROCFDUPE  DECIDE  7E&DS  TEST  SAMPLE,  ANALYSES  THE"  AMD 

PRFSENTS  A  SET  OF  NJMBERS  TO  THE  ANALYSIST  FOR  A  DECISION. 

"SAMPLE  SIZE"  IS  THE  NUMBER  OF  WHRQS  IN  THE  TC$T  SAMPLE 

LFSS  OMF. 

"Q"  COUNTS  THE  NUMBER  OF  WORDS  IN  A  TEST  SAMPLE  FOR 

PRINTING  A  IDENTIFICATION. 

»N"  COUNTS  THE  NUMBER  OF  SAMPLES  (WHICH  IS  LIMITED  ONLY  BY 

TIME  AVAILABLE  ON  thf  COMPUTER). 

thf  "CASC"  STATEMENT  ALLOWS  THF  SFLcCTinN  OF  ON«=  PP.CGP8M 

SEGMENT  FROM  A  LIST  FOR  EXECUTION  DEPENDING  °N  TH^ 

ORDINAL  VALUE  HF  THE  "CASE"  STATEMENT  PARAMFTER  "P."   THF 

VALUF  OF  "P"  nPDCMOS  ON  »7«  AMP  IS  ASSIGNED  3*  AN  "IF" 

STATEMENT, 

**BY  VARYING  THE  RANGE  OF  "P"  WITH  CHANGFS  Ti  thc  "T^" 

STATEMENT  IN  "DECIDE"  AND  "RAW  ANALYSIS"  THE  PROGRAMMER 

CAN  SELECT  THE  PARTITION  OF  THE"  DATA  TFST  SETS  AND  SAMPLE 

TEST  SETS  ACCORDING  to  WORD  LENGTH. 

"T"  tplL  LATER  PA°TS  OF  "DECIDE"  HOW  MANY  ROWS  OF  TME 

ARRAY  "DECISION"  WERE  USED  for  THAT  WORD... 

*********************************************************** ; 

PROCcDUPE  DECIDE; 

BEGIN 

REAL  C,B; 

REAL  ARRAY  DEC T S  ION( 0 :  :9 , 1 : : NHMBCP  )  : 

R<=AL  ARRAY  SA  VEDEC  I  S  I  ON  (  0  :  :  SAMPLES  I  Z  E  ,  1 :  :  M'J^BE  R)  ; 

INTEGER  P,T,Q; 

INTt=IELDSIZE:=^; 

Q  :=0; 

N  :=  m+1; 

WRI TE("SAMPLE     NUMBFR",N): 

FOP    K:=0    UNTIL    SAMPL^SIZE    DO 

BEGIN 

Q    :=   O+l; 

FOUND: =GETWOPD( WORD)  ; 

CHNVERT(CODE)  ; 

WRTTEC    ");    IOCONTROL(  2)  ; 

WRITC("SAMPLE    WORD    N'J^BFR"  t  0  ,  "  T  N    CODE     FORM     IS:"*CODE); 

WRITF(  "    ")  ;     I0C0NTROL(  2)  ; 

IF(BAD=TPUE)     THEN 
BEGIN 

IF(Z<=5)    THEN    P:=?  +  l    ELSE    P : =f ; 
CASE       P       OF  BEGTN 


COMMENT****    WORD    LCNGTH    =    ONE*****; 

BEGIN 

T:  =  0; 

FINDSOUND(O)  ; 

0NFP0INT:=P0INTEP; 

FOR     I    :=    1    UNTIL    NUMBER    DO 

DEC  I  SI  ON (0,1) :  =  0NC1( POINTER,  I ) 

END; 


COMMENT****    WORD    LE^STH    =    TWO*****; 

BEGIN 

FINDSOUND(O)  : 

T    :=    l; 

ONEPOINT:=POI  NT  ER  ; 

FOP     I:=l    UNTIL    NUMBER    DO 

DECISION (0,1) :=ONE 2 (POINTED , I ) ; 

FINDSOUNDd  )  ; 

POI NTE R : =ONEPO I NT*4+ POINTER: 

FOR     I:=l    UNTIL    NUMBER    DO 
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DEC  TSICNU  ,1  ) 


=  OMFTWn?(  PniviTco,  i  ) 


COMMFNT****    WORD    I  cVI3Th    =    thppe***** 

BEGIN 

t    :=    2 ; 

FINDSOUNO(O): 

ONFpniMT:sPpT  NTCP: 

FOP    I:=l    UNTIL    NUMBER    DC 

DEC  I  SI  ON  (0,  I)  :=0N=:»  (POINTcp,  j  )  . 

FINDSOUNDd  )  ; 

POT^"rcR:  =0NFPCINT*^4-P0lN"rct'  : 

TWOPnI NT:=POI MTEP; 

POP  l:=l  UNTIL  NUMBER  DO 

DEC  IS  I  ON  (1  ,1  )  :  sONFTWC"?  (  POIMTER,  I  )  : 

FIMDS0UND(2) : 

PO I NTCR :=tw0P0!NT*4*P0 INTER : 

FOR     l:«1     UNTIL    NUMBFO     ^0 

DEC  IS  ION (2, I) :=ONcT4033( oointcR. I ) ; 

END; 


COMMENT****    WORD    LCNGTM    =    FOUR***** 

BEGIN 
T    J  =    3  * 
FTNDSnuNnc? ): 

ONE  PCINT:  =  POI NTE«; 

C0P     I:=l    UNTIL    NUMB-p     DO 

oer i si  on (o, n :=one4< pointer, i ) : 

FINDSOUND( 1 ); 

POINTER: =0NEP0INT*4+°^INTCP : 

TWPPPT  N"T:=pqt  h\TE°: 

FOR     l:=l    UNTIL    NUMBE3     DO 

DEC  ISIONU  ,1  )  :=ONETWO'*(  POINTER,  I  )  : 

FINDSOUNn(?) : 

POT  NTFR:s-rwOPC,INT*4* P3INTFR  ; 

ONEPOiNT:=POIN"rER; 

FOR     I:=l    UNTIL    NUMBER    DP 

DEC  I  SI  ON (2, 1 ) :=0NcTW03  4(PriNTcp  f n ; 

FINDSOUND(B) ; 
P0INTER:=CNEP0INT*4f=>riMTC5  ; 

FOR     I:=l    UNTIL    NUM3CP     nP 
0CCISI0M(3, I ) :=0NCTW0344(PniNTEP, I) 
END; 


COMMENT****    WPPD    LENGTH    =    FIVC***** 


BCGIN 
T    :  =    4 ' 

FINDSOUND 
ONE  POINT: 
FOR  I  := 
DEC  I M ON ( 
FIMDS°UND 
POINTER:= 
TWOPOINT: 
FOR  l:  =  l 
OECISION( 
FINDSOUND 
POINTER  :  = 
THRCFPOIN 
Fnp     i:=i 

DEC  ISION( 
FINDSOUND 
POINTPR:= 
TWOPOINT: 
C0P  I:=! 
DEC  IS  I  ON ( 


(0) 

=  P0 
1    u 

0,1 

(1) 

PNF 

=  OQ 

UNT 

1,1 
I? ) 

TWO 
T:  = 
UNT 
2,1 

(3  ) 

THR 
=  P0 
UNT 

3,1 


I  NT co: 

NTIL    NU«BFR    DO 

) :=0NF5(P0INTCQ ,[]; 

• 

pPTMT*4*oniNjTPQ  : 

t  NTER: 

IL    NUMP-FR    DC 

)  :=0NcTW0?(°ni\|-ER,I  )  ; 

POI NT*4+PHTMT-R; 

IL    N'JMBEP    DO 

)  :=0Nctw0  3c!(  °OI^TER,  I  )  ; 

i=FPniMT*4  +  P0INTER: 
t  ntpr : 

IL    nu^rpp    n^ 

) :=0NPTWP3  45( POINTFD, I) ; 


162 


FINOSOUNDU)  ; 

POINTS  R:=TWOPOI  NT*  4-«-PO  INTER  ; 

POP     I:=l    U*TIL    NUMQCD     DO 

DEC  I  SI  ON  (4,  I  )  :=0N<=TW03^C  5  (POINTER,!) 

END; 


COMMENT****  WOPD  IENGTH  =  SIX  t    GREATFR***** 

BEGIN 
T  t  =  3  * 

F I  NO SOUND (0); 

CNE°OINT:  =  POI  NTEP; 

FOP     I:=l    UNTIL    NUMBER    00 

DEC  I  SI  ON (0,1  ) :=0MC6( POINTER,  I); 

FINDSOUNDU  )  : 

P0!NTPR:=0NEP0!NT*4  4-DnTNTPR  ; 

TWOD0INT:=P0I  NTER: 

FOR     l:=l    UNTIL    NUMBER    ^n 

DEC  I  SI  ON (I, I )  :=ONE TWOS (POINTER, I )  ; 

FIMDSOUNO(?>; 

PO  I  N'TER:=TWO  POINTS*  POINTER; 

THRFPPCINT:=POINTPR: 

FOR     I:=l    UNTIL    NUMBER     00 

DECISION (2, I ) :=0NFTW03  6( POINTER , I ) ; 

F!Nn$OUND(? ) ; 

POINTER  .  =THREPPOIMT*A-*-P0INTEP  ; 

POURPOINT:=PO! NTCR ; 

*=DR    l:=l    UNTIL    NUWBFR    00 

DEC  I  SI  ON (3, 1  )  :=0NETWC3<*6(  POINTER, I) ; 

FI^OSOUNO(Z) ; 

EPOINT:=POINTER; 

POINTER     :=    ONcPniNT*^-»-POINTER  ; 

FOR    I:=l    UNTIL    NUM3ER    OH 

DEC  I  ST  ON  (4,  I)  :  =  FI^STL&ST6(oOIN'Tco  ,  I)  ; 

OOINTFR : =F OUR  POINT *^fP POINT  ; 

Fhr    i:=i    UNTIL    NUMBER    00 

DEC  I  SI  ON  (8,1  )  :=0NPTWG3  4-C6(R0INTC(jf  i)  : 

SP&C=:=Z-l; 

FINDSOUND(SPACE)  ; 

POINTER  :=EP0INT*4* POINTER; 

cppjmt : =POI NTFR; 

FOP    I:=l    UNT!L    NUMBER    DO 

DEC  I  SI  ON (5, 1 )  :  =  EP?6( POINTCP  f I ): 

POINTep-^FouopoiN^MS  +  cDOINT; 

FOR     l:=l    UNTIL    NUMBER    DO 

DEC  I  SI  ON  (6,1)  :  =  ALLSOJND(  POINTER,  I  )  ; 

POT  NTER:-TW0P0tnt*1S*c  POINT: 

FOR    !:=1    UNTIL    NUMBER     DO 

Df-riSI0NC7tI  )  :=«=1?  Ec? 6  (dhimtcr,  i  ) 

END; 

END; 


COMMENT***************************************************** 
HERP  A  COLUMN  PRODUCT  IS  nBTa!N«=D  FROM  tHc  app&v 
"DECISION"  AND  ASSIGNED  TO  THE  "KTH"  ROW  OF  n S AVEDErI S I  ON . " 
ONE  ROW  IN  "SAVEDFCISION"  IS  GENEPATcn  FOR  CACM  WORD  IN  the 
TEST  SAMPLE  SET. 

FOR  J:  =  l  UNTIL  NUMBER  DO 

3PGIN 

DEC  I  SI  ON (9, J) :  =  1  ; 

cnR  i:=o  UNTIL  T  HO 

DECISION (9, J) :=0ECISIDN(9,J)*DECISI0N(  I ,J)  ; 

END; 

WRITEC'VALIDTTY  FACTORS  :"); 

WRITE(  "  ")  ;  IOCONTROK  2)  ; 

FOR  J  :=  0  UNTIL   T  DO 

BEGIN 
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FOR  I  :=  1  UNTIL  NUMBCR  no 

WRTTEPN<OFCIS!CN< J, !) ) : 

WOITEC  «•) 

END; 

FOR  J  :=  1  UNTIL  NUMBER  Dn 

SAVEDFCISION{ K , J ) : =  DFC I S TON (9 , J ) 

END; 

END  : 

C QM ME MT* ********************************************** ****** 
THE    NUMBERS    FOR     THF    DECISION    CRITERIA    ARE    £PTATNJED    F&0*     tmf 
ARRAY    "SAVEOECIS  IHM"    RV    TAKING    ROTH    A     COLUMN    P<>COUCT    AND 
COLUMN    APETHMETIC    MEAN. 

***************  *************************** ****** *********** ; 

IF(SAMPLESIZF=0)    THEN 

BEGIN 

FOR     J:=l     UNTIL    NUMBER    DO    WR ITEON( S A VFDEC IS I^M ( 0 , J )) 

END 

ELSE       BEGIN 

WRPFI"    ");     IOC  ONTROK  ">)  ; 

WRITP("VALIDTTY    FACTOR     PRODUCTS:"); 

FOP     J:=0    UNTIL    Q-l       D^ 

BEGIN 

WPITEC    "): 

FOP     I:=l    UNTIL    NUMBER    DO 

WRITEON(SAVEnECISTON( J, H ) 

END; 

FOR     J:=l    UNTIL    NUMBER    Dn 

3EGIN 

3:  =  l; 

C  :  =  0  * 

FOR  f  :=  0  UNTIL  SAMP|_eSIZc  DO 

BEGIN 

B    :=    B*SAVEDECISION( I, J): 

C:=C+SAVEDECISION(  I,  J) 

END; 

C:=C/(  SAMPLESTZE+l)    ; 

WPTtc(«  .»);  IOCONTRDLt  2)  ; 

WRITE(B) ; 

WRI"rEON(C)  ; 

WRTTE("  ") 

END; 

END; 

FNO  DECIDE; 
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CO  M  MEN  T  ******  ********************  *************************** 

PROCEDURE    COMPUTE_\JO°M    REPRESENTS    A    CONVENI CMT    METHOP    th 
GROUP    MULTIPLE    CALLS    TO    THC    SAMC     PROCEDURE    WITHOUT 
CLUTTERING    UP    THE    MMM    PROGRAM. 

*********************************************************** ; 


PROCEDU 

BEGIN 

COMPUTE 

COMPUTE 

COMPUTE 

rOMPUTE 
COMPUTE 
COMPUTE 
COMPUTE 
COMPUTE 
COMMUTE 
COMPUTE 
COM°UTP 
COMPUTE 

COMPUTE 
COMPUTE 
COMPUTE 
COMPUTE 
COMPUTE 
COMPUTE 
COMPUTE 

COMDUTP 
COMPUTE 

COMPUTP 
COMPUTE 
COMPUTE 
rnMPUTE 
COMPUTE 

END    CfM 


PE    COMPUTc_MORM; 


ANY 
'ANY 
'AMY 
'ANY 
'ANY 

ANY 
'ANY 
'ANY 

ANY 

ANY 
'ANY 
'ANY 

ANY 
'AMY 
'ANY 
'ANY 
'ANY 
'ANY 
'ANY 

ANY 

ANY 
'AMY 

ANY 
'ANY 

ANY 

AMY 


,ONEl 
,ONE? 
,0NE3 
t0NE4 
T0NC5 

,0NE6 
,E6)  : 
5, ONE 
5,0NC 
5, ONE 
5,  ONE 
5, ONE 
5,FI' 
5fFIR 
5  ,  ec? 


3,  ONE 
3,  ONE 
3,0NC 
3,  ONE 
55, ON 
5  5,  ON 
55,  ON 
5«5tF! 
023,0 
023,  n 
095,  ft 
P"UTE    NORM; 


); 
); 
); 

); 
); 
); 

TW021 

TWO?) 
TH04) 
TW05  ) 
Td06  ) 
STL&ST5) 
STLAST6 ) 
6)  ; 

Trf033  ) 
TWP'4) 
TW035) 
TW036) 
ETW0^4-4); 

ETW0345); 
ETwn?46) ; 

2EE26)  ; 

^  =  TWn34E«j  ) 
MPTW0^4E6 ) 
LLSPUNn) 


165 


COMMENT********************  ********************************* 
PROCFCUPE    RAW    ANALYSIS     USES    AN    IDENTICAL    "CASF"    STATc^fmt 
TO    THAT    USED    TN    "DECIDE"    TO    PARTITION    the    DATA    BASE    SCTS. 
**********************  *  *********************  **************** 

PROCEDURE    RAW    ANALYSIS; 

BEGIN 

INTEGER    P; 

IF(BAD=TRUE)     THEN 

BEGIN 

POINTPR :=0; 

IE(Z<=5)    THEN    R:=Z+1    ELSE    P:=6; 

CASE    P    OF  BFGIN 

COMMENT ****** WOP OS    WITH    ^N£    SOUND******; 
ONESCUND(ONFl ,0,4) ; 

COMMENT******WORDS    WITH    TWO    SOUNDS******; 

BEGIN 

0MFSnUND(CNf=2,0,4)  ; 
0NFS0UND(ONETWO2»l«161 

END: 

COM^ENT******WO»DS    WITH    THRE«=    SOUNDS******: 

REG  IN 

0NFSCUN0<CNE3,0,4)  ; 
ONcSOUND(ONETW03,l,lf>)  : 
ONt=SCUND(CNETWn33,  ?,6^) 

end; 

comment******words   with  ^oup   sounds******: 

BEGIN 

0NFS0UND(0NE4,0,4) ; 
ONE  SOUND (0NETW04, 1,16)  : 
CNF  SOUND (ONET WO  34,2,64) ; 
ONE  S  OUND ( ONET  WO  344 , 3 , 2 5 6 ) 
END; 

COMMPNT******WORDS    WITH    FIVE    SOUNDS******? 

BEGIN 

ONESOUND(ONE5 ,0,4) : 
ON^PCINT:  =  POT  NTER; 
ONE  SOUND (ONET WO  5, 1 ,16)  : 
ONE S OUND < ONET WO  3 5, 2, 64) ; 
0NES0UNC(ONETWO345,3,256J ; 
0NcS0UND<0NcTWD34c5,4t 10?4) ; 
POINTER:=CNEPnIMT: 
0NES0UNO(FIRSTLAST5,4, 16) 
END; 

CDMMENT******wnpDS    WITH    SIX     £    GocATcc     SOUNDS******: 

BEGIN 

ONESOUNC(ONE6,0,4) ; 
ONPPOINT:  =  POINTFR; 
ONP SOUND ( ONET W06,l ,16) ; 
TWOPOINT:=POI NTER: 
0NES0UMD(0NETW03  6,2,64) ; 
ONE  S  OUND  fONH"  WO  346,  3,  2  56) ; 
F0Ut'POINT:=P0INTcP; 
POINTER :=0; 
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0NFS0UND(E6,Z ,4) ; 

SPACE:  *GNEP0INT*^P3INTER; 

FI  PSTLAST6lSPACE,NUMBcR  )  :  =F  I  OSTL A STS  (  S  PACP  ,  NUMBER  )  M  ; 

FIPSTL  AST6(  1^  tNUMBER):  =FIRS"TLaST6(  16, NUMBER) M  ; 

FTPSTI_AST6(SPACE»0  ):  =  l  : 

SPACE:  =F0URP0INT**4-P0INTER: 

0NPTW03AP6(SP  AC  E»  NUMBER  )  :  =GNFTW03  4E6  (  SP  ACC ,  N'JMBFP  )  +  l; 

ONETWO?4E6(SPACE,0) :=1  : 

0NETW0  34E6(  10  24,NUMBFR)  : =0NFTW0  34E6 (  10  24,NUMB<=Q)  M? 

SPACE:=7-1; 

ONE  SOUND (FF2 6, SPACE,  16) ; 

SPACE: =FOURPOINT*l 6+ POINTER; 

ALL  SOUND (So ACE tNUMBE") : = ALL  SOUND (S PAC E , NUMBER )+l : 

ALl SOUNT(SPACE,0):=1; 

ALL  SDUND(  4096,  NUMB  FP)  :  =  ALL  SOUND  f  4096  ,NUVR<=p  )¥i. 

SPACE:  =TW0P0INT*1S4-PHIMTER  ; 

F12EF?6(SPACE,NUMREP):  =  <= 1 2E E2  6 ( S PACE , NUMBER ) * 1  ; 

F12FE26(S°ACF,0):=1; 

F12EE2 6 (256, NUMBER) : =c 1 2PE26( 256 , NUMB EP ) +1 

END; 


END; 
END; 
END    PAW.ANALYSIS 
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£  HMMENT****** ****** ********  ******************  ***  ************ 

0RPCEDU<5E    C0wP'JTc_4\jy     IS    EVcruT=0    ONCE    FOR    EACH    ARRAY 
CONTAINING    FREQUENCIES     °ER    LANGUAGF.        THE    LAST    POW    OF    <=ACH 
DATA    ARRAY    CONTATMS    THE    TOTAL    NUMBER    nF    WORDS     WHICH    HAVE 
FREQUENCY    DATA    STORED     IN    TH^    CORR ESPnNPINO    COLUMN.       THIS 
T^TAL     IS    DIVIDED    INTO    -ACH    FNTPY     IN    thc    COLUMN    GTVTNG 
A    PERCENTAGE    OF    OCCJ^ANTE    «=P°    that    S^UND    COM9INATIPM 
WITHIN    THE    GIVEN    PARTITION. 
THE    CALLING    ARGUEMCNTS    A^: 

1).       INTEGER     !TFRATI3\j:       THE    SUBSCRIPT    OF    THE     LAST    ROW     IN 
THE     ARRAY    WHICH    HAS    FREQUENCE     INFORMATION    IN    IT.        IN 
GENERAL    IT    ROW    OIMENSION    OF    THE    ARPAV    BETNG    MASSED    IN    LESS    I 
2)        RAW    NUMBERS:       THE    ARRAY     BEING    NORMALIZED. 
*******?**********  *****************************************. 

PROCEDURE    COMPUTE    ANY(INTFGEP    VALUE    I TERAT IOM ; RF AL    ARRAY 

RAW  NUMBERS** ,*) ): 

BEGIN 

INTEGER  T; 

T  :=  ITERATICNM  : 

IF(  RAW  NUMBERS (T, NUMBER )-.=0  )  THEN 

BEGIN 

FHR    K    :=    0    UNTIL    ITERATION    DO 

RAW    NUMBEPSIK  .NUM^E1? )  :  =R  AW_NUM3ER  S  (  K  .NUMBER)  /R  AW_NUMo.pr<; 

(T, NUMBER) 

END; 

END    COMPUTE    ANY; 
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COMMON 
SINCE 
ARRAYS 
DONE  D 
ARRAY 
ONF.  T 
FOE  QUE 
CHECKI 
DIVISI 

****** 

PROCED 
BEGIN 
INTEGE 
J:=K:= 
FOP  I 
3FGIN 
ONcl(I 
ONF?<  I 
ON  F  3  (  I 
ON=M I 
0NF5U 
ONES (I 
E6<  I  »N 
Fnp  o 

BEGIN 
ONETWO 

ONcTWO 

ONFTWO 

ONFTWO 

ONPTWO 

FIPSTL 

PI°STL 

EE?6( J 

J: = J+l 

FOR  S 

BEGIN 

ONETWO 

ONETWO 

ONFTWO 

ONFTWO 

K:=K+1 

FOR  T 

BEGIN 

O^FTwn 

ONETW3 

ONFTWO 

F12EE2 

l:=L+l 

FOR  M 

BEGIN 

ONFTWO 

ONFTWO 

R:=R+1 

FHP  0 

BEGIN 

ALL  SOU 

N:=N+1 

END: 

ENO; 

END; 

ENO: 

END; 

END; 

END  CL 


T ****** *********  *************** 

ALGOL-W  HAS  MO  f=OUIVALcNT  Tp  a 

MUST  RE  INITIALIZED  TO  THE  DES 
NE  COLUMN  AT  A  TIME.  "ZIP"  IS 
ELEMENT.  CnLJMN  ZCRH  IN  PACH  A 
HIS  VALUE  IS  CHANGED  TO  PLUS  ON 
NCY  TMFOPMATION  IS  MADE  IN  THAT 
NG  COLUMN  ZCPD  IN  LATPR  PARTS  0 
ON  Bv  ZERO  IS  CLIMINATFD. 

*********************  ********** 

URE    CLFARMEMfRFAL    VALUE    ZI°); 


******** 
FORTRAN 
IRED  VAL 
THF  VALJ 
RPAY  IS 
F  WHEN  A 
PARTICU 
F    THC     PR 


r*  at 

UE. 
E    G 

SET 
N  = 
L  AT 
OGP 


*  ***** 

A     STAT 

THIS 
t  V  =  N    T 

TO    MI 
NTPY    "I 

Rnw. 
AM, 


fmentt 

IS 

0    EACH 

NHS 

c 

BY 


******* *************** 


R    J»KtLfR.N; 

L:=R:=N:  =  (3; 

:=    0    UNTIL    *    DO 

, NUMBER ) :=ZTP; 
tNUMBEc ) :=ZIP; 
,NL'MBER):  =  ZIP; 
f  NUMBPP  )  :  =  ZI  P; 
, NUMBER) :=ZI°; 
♦NUMBER) :=ZT°; 
UMBFR) :=7IP; 
:=    0    UNTIL    3    00 

2  ( J»NUMBER)  :  =  ZIt>: 
3( J.NUMRFR) :=ZIP; 
4( J, NUMBER ):=ZIP: 
5 ( J,NUMeER) :=ZIP; 
6( J, NUMBER) :=ZIP; 
AST5( J,NUM^co ) :=ZI°; 
AST6(  J,MUMecP  )  :  =  ZI<>; 
,NUMBER)r=ZIP; 

:=   0    Until    3    DO 


33(K,NUMBEP) 
34(K, NUMBER) 
35(K, NUMBER) 
36<K, NUMBER) 


=  ZIP 
=  ZIo 

=  ZI  P 
=  ZIP 


:=    0    UNTIL    3    30 

34MLt NUMBER)  :  =  ZID; 
3A5(Lf NUMBF3 ) :=ZIP; 
346<L, NUMBER) :=ZIP: 
6 ( Lf NUMBER) :=ZI°; 

:=    0    UNTIL    ?    30 

34E6(RtNUM«FRl :=ZI°; 
34E5(R» NUMBER) :=ZIR; 

:=  0  UNTIL  3  DO 

ND   (N, NUMBER) :=ZIP; 


EAPMEM; 
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COM  MEN  T  ******  ********  *  *  *  *  A  *  ***  A  *  *  ***  A  **  ***  **  *  *  **  *  *****  *  ***** 

PROCFDURF  FINDSOUN^  IS  CALLFD  FROM  "DECIDE"  AMD  RETURNS  A 
VALUE  OF  "POINTER"  CORRESPONDING  TO  THE  SUBSCRIPT   0=  THE 
SOUND  IN  THE  ARRAY  "CLASS."   BECAUSE  ALL  THE  SOUNn 
COMBINATIONS  ARE  POWcRS  OF  FOUR,  IT  IS  A  SIMPLF  MATTER  TO 
COMPUTE  SAY  A  TWO-SOUND  COMBINATION  BY  RFMFM.BSRING  WHAT  THF 
FIRST  SOUND  WASt  MULTIDLYING  TH  =  FIRST  SOUND  SUBSCRIPT  BY  4 
AND  ADDING  THE  SECOND  SOUND  SUBSCRIPT.   THE  BASIC  I^EA  OF 
MODULO  4  ARITHMETIC.   MO  MATTER  WHAT  SOUND  COMBINATION  IS 
THE  OBJECTIVE  OF  tHP  SEARTH,  TH<=  PROGRAM  ONLY  SEARCHES  A 
LIST  OF  FOUR  CLEMFNTS.   "WS"  TELL  "c!NDSOUND"  WHICH  SOUND 
IN  THE  WORD  to  LOOK  AT. 

***************** *****************************  *************; 

PROCFDURF    FINOSOUNDdNTEGER    VALUE    WS  )  ; 

BEGIN 

POINTFR :=0; 

WHILF(C0DF(WS! 1 )-=CLASS( POINTER ) )     DO 

POINTER:=POI*'TFR*i  ; 

END    FIND SOUND; 


PROCEDURE    nNESnUNTCREAL     ARRAY    0!JTPUT  (  *  ,  *)  :  I  NTEGER    VALM' 

WStLENGTH) ; 

BCGIN 

INTEGFR    PIN; 

PIN    :=    POINTER; POINTFR :=o; 

WHILE(C0DF(WS| 1 )-*=CLASS( POINTER) ) DO 

POINTFR  :=P0INT«=R*1  ; 

POINTER :=p I N*4f POINTER ; 

OUT  PUT ( POINTFR, NUMBER)  ;= OUTPUT?  POINT FR , NUMBER ) +  1 ; 

OiJTPUT  (LENGTHtNUMBPR  )  :  =OUTPUT(  L«=NGTM  ,  NUMBER)  M  ; 

OUTPUT ( POINTER ,0) :=1 

END  ONESCUMD; 
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COMMENT**** **  ****** ********  *******************  ***  *********** 
PROCEDURE    SINGLE    DR33S    COMPUTES    THE     ACTU&L    °R03ABILITY    HF    A 
LANGUAGE    GIVCM    AfiY    SINGLE    SOUND    WHICH    THE    PROGR&M    LOOKS     AT 
AS    A    SEPARATE    EMTITY.        I.E.,    the    FHST    SOUND    OF    EACH    WDPO 
AND    THE    LAST    SOUND    OP    WO°DS    SIX    SOUND    AND    GPcATEO     IN    LENGTH. 
THF     ASSUMPTION    IS    ^ADE    THAT    ALL    LANGUAGES    AR=     FCUALLY 

PROBABLF. 

******************* a* ****************************** ******** : 


PROCEDURE    SINGLF_PP3BS; 

BEGIN 

RPAL    B»C 

FOP     I     :  = 

BEGIN 

B:=C :=D: 

FOP    J    := 

BEGIN 


tD,E»FtGtH; 

0  UNTIL    3    93 

=p:=F :=G:=H:=3; 

1  UNTIL    NU^BE"    Dn 


B 

C 

D 
E 

F 

G 

H: 


B  +  C 
C  + 
D* 
E  + 
F* 
G  + 
=  H+E6( 
END; 
FOR    K 
BEGIN 
IF( B-=0) 
ON«=l  (I  ,K 
IF(C-»=0) 
ONE2(I *K 
IF(D-.=  0) 
ONF3U  ,K 
IP(E-.=  0) 
ONF^f I  ,K 
IFC=-.=  0) 
ON^5(I  ,K 
IF(G-.=  0) 
0N<=6(I  ,K 
IF(H-=0) 
E6(  I  ,K): 
END; 
END; 
END    SING 


NEM  I  t  J) ; 
ONE 2 (I, J); 
CNF3(  I, J): 
ONEM  I, J)  ; 
ONF5(  I,  J); 
0NP6 ( I, J) ; 


1  I 


J) 


=  1  UNTIL  NUMBER  nO 


THFM 
):=0MP1(  I,K)/B 

THEN 
)  :=ONE2(  I,K)/C. 

THEN 
):=ONF3(I,K)/D 

THEN 
) :=ONEM  I, K)/c 

THEM 
):=ONE5(T,K)/*= 

THEN 
) :=0NP6(I,K)/G 

THFN 
=E6( I,K)/H; 


LE  PPOPS; 
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£gMME NT ******  **  ************  ***************************  ****** 

PROCEDURE  GRA^H  P'ovnES  A  CONVENIENT  GRAPHICAL 
REPRESENTATION  OF  ANY  DATA  ARPAV  USED  AT  ANY  POINT  IN  the 
PROGRAM.   THE  CALLING  ELEMCNTS  ARE: 

1)  DATA:   THE  AP°AY  TO  BE  GRAPHED. 

2)  LABEL:   THE  STRING  ARRAY  WITH  LABELS  CORRESPONDING  TO 
DATA. 

3)  COUNT:  THE  LAST  ROW  SUBSCRIPT  OF  "DATA"  WHICH  CONTAINS 
INFORMATION  TO  BE  GRAPHED,  I,E.,  ROW  DIMENSION  OF  DATA  LESS 
ONc. 

4)  SCALE:   NUMBER  3F  PERCENTAGE  POINTS  PER  PRINT  SPACE, 
EITHER  1  OR  2. 

5)  HCADING:   10  tp  GRAPH  IS  TO  SHOW  OANGc  OP  ZERO  TO  ONE 
HUNDRED.   5  IF  RANG<=  IS  ZERO  T0  FIETy. 

6)  WIDTH:   WIDTH  Oc  GRAPH  POINT  SPACE,  50  OR  100. 

7)  TOGGLE:   COLUMN  rr>    CHECK  TO  SEE  Ic  THAT  ROW  Cpnt&tmS 
ANY  NUMBER  0THER  THAN  ZERO.   IS  SET  TO  ZERO  C0R  ALL  CASES. 

GRAPH  WILL  PRINT  A  LETTER  CHRR FSPOND I NG  TO  THE  PPHER  nF  THE 
BASE  DATA  SETS.   A  =  LANGUAGE  1,  B  =  LANGUAG=  2,  ETC. 
IF  TW3  VALUES  ARE  IDENTICAL  0"  A  LINE  OF  THE  GRAPH  **"     IS 
PRINTFD.   IF  A  WIDTH  ^p  50  AND  SCALC  OF  n\n    IS  SELECTED, 
NORMALIZED  SETS  HP  data  CAM  BE  REPRESENTED  BECAUSC  THC 
VALUF  WHICH  IS  GREATER  THAN  50  WILL  BE  PRINTED  IN  TH^  RIGHT 
MARGIN  OF  THE  GRAPH. 

***********************************************************; 

PROCEDURE  GRAPH  (RFAL  ARRAY  DATA(*,*); 

STRING(6)  ARPAY  LABEU*); 

INTEGER  VALUE  C OUMT , SC ALE , HEADING  , W IDTH,TnGGL E  )  ; 

BEGIN 

STPING(l)  OVERFLOW; 

INTEGER  AMTteiG, LINES; 

LOGICAL    TO^    BIG; 

string (i7)  Flag; 

STRINGU)     ARRAY    MATRIX     (0::WIDTH); 

PROCEDURE    HOR IZ    LINE; 

BEGIN 

IOC0NTPOL(2)  ;    WRTTFC  "); 

FOP     I     :=0    UNTIL    WIDTH    DP 

BEGIN 

IF(  I    REM    5=0)     the* 

WRITcpn("+")     ELSE    WRIT=ON<"-")       END: 

END    HORIZJ.INE; 

PROCEDURE    HOPIZ    HEAD; 

BEGIN 

INTEGCR    P: 

WPITF("    "); 

IOCONTPOL(?) ;     WRITC(«  ») ; 

IF(WIDTH=50)     THEN    INTE  I  F|_DS  I  ZE  :  =3    FLSE     INTFI E L DS I Zc :=3 ; 

FOR     I     :=    1    UNTIL    10    DO 

BEGIN 

P    :=    SHEADING    ;       WRITEON(P) 

END; 

END    HOPIZJHEAD; 

ELAG:="    ABCDEFGHIJKL^NPR"; 

HORIZ    HEAD: 

HOPIZ""LINE; 

LINFS:=0; 

FOR    I     :=    0    UNTIL    COUNT    DO 

BEGIN 

TOO    BIG:=FALSE; 

OVERFLOW:  ="    "; 

IF(DATA( I,TOGGLE)-=-l)     THEN 

BEGIN 

LINES:=LINFS+1; 

FOR    J     :=    0    UNTIL    WTDTH    no 

BEGIN 

MATPIX(J)     :=    "    "; 
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FOR 
BEG 
AMT 
IF( 
TOO 
OVF. 
BIG 
END 
IF( 
BEG 
TF( 
MAT 
ELS 
END 
END 
cNn 

foe 

WRI 

cOP 
BEG 
WRI 
END 
WRT 
TNT 
IF( 
Ic( 
BPG 
WRI 
FOR 
FNn 

END 

TF( 

BEG 

LIN 

HOP 

HDP 

IOC 

WRI 

HOP 

HOP 

ENO 

END 

IOC 

HOR 

HOR 

WQT 

AMT 

IOC 

POP 

END 


K  :=  1  UNTIL  NUMBER  Dn 
IN 

:=POUND(  (DATA(TtK)*ir>0)/SCAL«=»  : 
J=WIDTH) AND* AMT>J)  THEN       BEGIN 

BIG:=TRUE; 
R"<=LOW(D|  1)  :=  FLA3(K!  1)  ; 
:  =AMT 

• 

AMT=J)  THEN 

IN 

MATRIX( J)-="  ")  THEM 

PIX(J)  t=  "* " 

E   MATpjx(J)  :=  FLAG(Kll) 


ONTROL(?) : 
TE(LABCL( T ) * "  I  " ); 

H  :=  0  UNTIL  WIDTH  DO 
IN 
TEON(MATRIX(H)) 

TFOMC !  ")  ; 
FTFLDSIZE:=?5 

TOO  BTG=TPUF)  THCN   WRITcON( OVFRFL OW , 91 G1  ; 

CPUN"T<16)  THEN 

IN 

tec      !"15 

T  :=  0  UNTIL  WIDTH  DP   WRITEOW  "15  WPItpqm("|'M 


LINES=50)  THFN 

IN 

CS: 

I  Z_ 

I  Z 

HNT 

TE( 

IZ 

IZ" 


=  0; 
LINE; 
HEAD: 
RCLO)  ; 

II     II  )  • 

hpad; 

"LINE 


WRITE(«CONTINUcO"  ): 


0NTO0H2)  ; 

IZ    LINE; 

I Z    HFAD    ; 

TET"    ");    WRITC("SAMDLE    SIZCS    ARF    :  «M  ; 

:=    COUNT* l: 
0NTROU21  : 

I     '.-    1    UNTIL    NUMBER    Dn    WRI  TEOM<  nA  TM  A'*T  ,  I  )  ) 

GRAPH; 
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£q|U|^PNY******  *********  *****  ***  ***  ****  **  ****  A  *****  *****  *  ***** 

MAIN    PROGRAM:       GREATER     FLEXIBILITY    WAS    REALIZcO    BY 

ENCLOSING    THE    ENTTRF    PROGRAM    IN    TH^     "DUMMY"    PROCEOURc. 

THIS    ALLOWS    THE    PROGRAMMER    T0    S0CCIFY.     WITH    THE    VALUE    Cc 

"DIM"    HOW    MANY    LANGJAGES    ARE    TO    BE    LOAOED    AS    3ASE    DATA. 
******************  ****************************************** 

CLASS(O):--    "    "• 

CLASS(O) (Oil) :="F"; 
CLASS(1):="    "; 
CLASS(l)(Oll) :="M"; 
CLASS(2):="    "; 
CLASS(2) (0! 1) :="S"; 
CLASS(3):="    "? 
CLASS(3) (0| 11 :="V"; 

GENERATETWO? 

GENERATpTHPEP; 

GEN^RATEFPUR: 
GENERATRIX*. 

GETAROAY; 

S^TCOUNT; 

NUMBPP     :=    0; 
CLEARMEM(-1  )  : 
N    :=    1; 


WHILC(N>0)     AND(NUMBEP<DIM)     DO 

BEGIN 

NUMBER    :=    NUM6ER    +    1     ; 

INITIALIZE; 
GLEAPMEM(O) ; 


WHILE( GETWORD{WORD) )     DO 

BEGIN 

CONVEPT(CODE)     : 

RAW    ANALYSIS 

END; 

COMRU^E.NORM; 

READ(N) 
END; 
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GRAPH( 

GRfiPHC 

GRAPH( 

GR&°H( 

IGCnNT 

GRAPHf 

GRAPH( 

GRAPHt 

IOCONT 

GRAPH* 

GRAPH( 

i nc  ONT 

GPAt>H( 

GRAPH! 

IOCCNT 

GRAPHC 

GRAPH( 

IOCCNT 

GRAPH( 

GR^PH( 

IOCCNT 

GRAPH 

GRAPH 

I C*  ONT 

GRAPH 

GRAPH 

IOC ONT 

GRAPH 

IOCONT 

GRAPH 

IOCONT 

GRAPH 

IOCONT 

GRAPH 

IOCONT 

GRAPH 

I  or ONT 

GRAPH 

IOCCNT 

GRAPH 


ONE1  ,TLAS 
ONE2, CLASS, 
ONE3, CLASS, 
0NE4, CLASS, 
ROL(3) ; 
ONE5  ,CLAS 
ONE6  ,  CLAS 
E6  .CLASS 
ROL13) ; 
ONFTWn? 

ONETW03 

ROL(3) ; 

0NETW04 

ONETW05 

ROL(3) ; 

0NETWO6 

FIPSTLAST5 

ROH3)  ; 

FIPSTLAST6 

EE26 

RCL  (3)  ; 

(ONFTW033 

(0NETW034 

ROL(3) ; 

(PNFTW035 

(OMFTWn36 

ROL(3) ; 

(ONPTW0344 

ROL<3) : 

(CNFTW0345 

POL<3) ; 

(0NETWP3^6 

ROL<3); 

(F12FF26 

ROLC3); 

(CNFTW034E5 

ROLO); 

(0NETWC34E6 

ROL<3)  : 

(ALLSOUNO    , 


S, 3, 2, 10, 50,0)  ; 

3,1,  5,50,01; 
3,1,  5,50,0); 
3,1,    5,50,0); 

s,3,l,  5,50,0); 
S,3,l,  5,50,0); 
,3,1,    5,50,0); 

,  SO'JNOTWO,     15, 
,SOUNDTWO,     15, 

,SOUNDTWO,     15, 
,SO'JNDTWn,     15, 

,SPUN0Twn,     15, 
,SntJNDTWO,    15, 


50, 

50, 

50, 

50, 

50, 
50, 


,SOUNPTWPt  15,  1,   5 
,S0UNDTW0,15,1 ,  5,50 

,SOUNDTHREF  ,  63, 
,SOUNDTHREF  ,  63, 

,SPUNDTHREF  ,  63, 
,SOUNDTHRFc  ,  6*, 


,    50, 
,0)  ; 


,S~)UNDFOUP 
,SOUNOFOUR 
,S0UNDPOUR 

,SnUNDFOUP 


255, 
255, 
255, 
255, 


,SOU\IDFIV<=  ,1023  ,1  ,  5 
,SPUNDFIV=  ,1023  ,!  ,  5 
SOUNOSTX  ,4095  ,1  ,  5  ,50 


5, 
5, 

5, 
5, 

5, 

5, 

5, 
5, 
,5 
,5 


0  )  ; 
0  ); 


); 
); 

); 
); 


0  ); 

50,  0) 
50,  0) 

*0,  0) 
50,  0) 

50,  0) 

50,  0) 

50,  0) 

50,  0) 

0  , 0  )  ; 

0,0); 

,0  ) ; 


175 


SINGLC     PROPS: 

PRP8    TW0(CNFTWD2»     ONr2,     PNFTWP2,     3,     3); 
PROBlTWO(PNFTW03,     GNF3 ,     ONFTWP3,     3,     3): 
0RPB    TWO<PNETWP33,PNETWG3,ONETVn3  3,15,3)  ; 
PRnB"TW0(nMFTWri4t     0NC4,     0NFTWC4,     3,     3); 
PR0B~TW0(0NpTW034,    0N=TWG4,     0NFTW034,     15,    3)5 
PRPB~TWP(0NETW0344,     GMFTWP34,    PNCTW0344,    63,     ^); 
PRP3~TWO(ONETW05,    ONc5  ,     ONETWOSi    3,     3): 
PRnB~TW0(CNFTWP3%     GN^TWPS,     ONFTWP35,     15,     3); 
PR08"TW0(0NETWP345,     GMCTWG35,    GNFTWG345,    63,     3); 
ORGB~TWP(PNFTWG34F5,    GNFTWG345,     0NETWH34E5,     75^,     3) 
PRPB~TWP(FTRSTLAST5,     GNF5,     <=IR<;tlAST5,     3,    3); 
PRPR    TWG(PNPTWG6,    CNF6  ,     GNFTWP6,     3,     3); 
PRPB~TWG(PNFTWG36,     0NcTWP6,     G^FTWP36,     15,     3); 
PROS    TWPfPMFT  WU346,    0McTWO36,    0MCTW0346,    63,     3): 
PR08~TWP(CNE1  WMi^h6,     nNjPTwp?46,     0NETWO34^6,     255,     1) 
PR0B"Twn(FP26,""tr6T    EE26,     3,     3); 
PRPB    TWO(F12EE26,°NETWn6,F12FE26,  15,15); 
PRPBlTWP( ALLS PU NO, C^ETWP3 46, ALL? HUMD, 7  5  5,15)  ; 
PRPR    tWC(FIRSTLAST6,    GNF6,     FIPSTLACT6,     3,    3); 
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GRAPH( 

GRAPHC 

GPAPH( 

GRAPH( 

IOCONT 

GRAPH( 

GPAPH( 

GRAOH( 

IOCONT 

GR^PH( 

GRAPH( 

IOCCNT 

GRAPH( 

GRAPH( 

IOCONT 

GPAPH( 

GRAPH( 

IOCONT 

GRAPH( 

GRAPH( 

IOCONT 

GRAPH 

GRAPH 

IOCONT 

GPAPH 

GRAPH 

IGCONT 

GRA°H 

IOrGNT 

GRA^H 

IGCGNT 

GRAPH 

IGCGNT 

GPADH 

IGCONT 

GRAPH 

IOCCNT 

GRAPH 

IOCCNT 

GRAPH 

IOCONT 


ONE1       , 

ONE2,CL 

CNE3,CL 

ON^4,CL 

RCL(3) ; 

ONES       , 

0»"E6       , 

E6  ,C 

ROL(?) ; 

CNETW02 

OMETWG3 

R0L(3) ; 

HNETW04 

0NETW05 

R0L(3) ; 

ONETW06 

FIRSTLA 

ROL(3)  ; 

PIPSTLA 

EE26 

R0L(3)  ; 

<CNFTWH 

(ONETWO 

POL(3) ; 

(PNCTWC 

(ONETWO 

POL(3) ; 
(ONETWO 
ROL(3)  ; 
(ONETWO 
RGL(3)  ; 
(ONETrfn 

ROL(3); 
(F12EE2 
RCL(3)  : 
(ONETwn 

POL(3)  : 
(ONETWO 
ROL(?)  ; 
(  &LLSOU 
ROL(3)  ; 


CLASS 
ASS, 3 
ASS,^ 
ASS, 3 

CLASS 

CLASS 
LASS. 


1, 

1, 

It 
It 

It 
It 

It 


,3,1,     5,^0,0); 
,1,    5,50,0): 
,1,    5,50.0); 
,1,     5,50,0): 

,3,1,  5,50,0): 
,3,1 ,  5,50,0) ; 
3,1,     5,50,0); 

,SOUNDTWG,  15, 
,SOUNDTWO,     15, 

,SOUNOTVG,  15, 
,SOUNDTWG,     15, 

,SOUMDTWnT     15, 
ST5       ,SOUNDTWP,     15, 

ST6       rSOUNDTWn,    15, 
,SGUN0TW0,15,1 

33  ,S0UN0TH°EE     ,    63, 

24  ,SOUNDTHPFE     ,    P, 

35  ,SGUNOTHPEE  ,  63, 

36  ,SGUNDTHPEC  ,  63, 

^44  ,SOUNOEOUP     ,    255. 

345  ,SOUNOEOUR     ,    255, 

346  ,SOUNOFOUP  ,  255, 
6  ,SnUNOFOUP  ,  2C5, 
?4E5,SGUM0FIVE  ,10?3  ,1 
34E6,SGUN0FTVE  ,1023  ,1 
ND    ,SOL'NDSIX    ,^095     ,1     , 


5 
5 

5 
5 

5 

5 
,50 


SO 

50 
50 

50 
50 


,  0  )  : 

,  0  ): 

,  0  ); 

,  0  ) ; 

,  0  ); 

,  0  ): 


50,    0     ): 


,0): 


50,  0) 

50,  0) 

50,  0) 

50,  0) 

50,  0) 

50,  0) 

50,  0) 

50,  0) 


50 


50    ,0    ) ; 
50    ,0    )  ; 
,0    )  : 
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REA0CSAMPLESIZF1 ; 

N  :=  0   ; 

WH!LE( S4MPLFSIZP-=-l )  DO 

BEGIN 

TP  :=  80; 

DECIDE; 

IorDNTpntm  ; 

RFAD(SAMDlESIZE) 

FMD; 

ENn; 


READ(OIM); 

DUMMY 

END. 
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COMMENT***************  ************************************** 

THE  OATA  OFCK  IS  TO  BE  STACKED  AS  FOLLOWS: 

1).   CARD  WITH  ThF  NUMBER  OF  LANGUAGES  FOR  SASP  DATA 

ALAMYSTS. 

2).   RQMI. 

3).   CAPD  WITH  TH=  MJMBEP  HF  CA^DS  WHICH  CONTAIN 

IDENTIFYING  INFORMATION  ABOUT  THE  BASC  DATA  ELEMENTS. 

THIS  IS  ASSIGNED  AS  HEAOCOUMT. 

4).   DATA  CARDS  CONTAINING  POMI  REPRESENTATIONS  OP  THE  IPA 

SPELLING  OF  WORDS.   A  tfOPD  CANNOT  BE  STARTED  nM  ONE  CARD  AND 

CONTINUED  ON  THE  NEXT. 

5).   CAPD  WITH  "S"  IN  COLUMN  9  TO  SIGNAL  END  °F  DATA  BASE 

SET. 

6).   CAPD  WITH  -1,  IF  NO  MORE  BASE  DATA  SCTS  FOLLOW.   ANY 

NUMBER  OTHFR  THAN  ZEPO  WILL  SIGNAL  THAT   ANOTHER  Sct 

WILL  FOLLOW.   SUGGESTED  SEQUENCC  IS   ONE  THOUGH  FOU&  WITH  A 

ZPRO  FOLLOWING  THF  =  INAL  BASE  DATA  SET,  THEN  THEN  NUMREPS 

ONF  THROUGH  "N"  FOR  THE  TEST  DATA  SAMPLFS,  WITH  A  -1 

FOLLOWING  THE  FINAL  TEST  OATA  SPT. 

********************£**************************************; 


Q  Q|H^piVjT  ********************************************  ********* 

ROMI  MUST  ALWAYS  B  p  THE  ^IRST  pATA  SPT  FOLLOWING  XHE  "SnATA" 
CAPO  (JCL).   THE  NUMBER  "5"  SHOWN  RcLOW  T^LL  HOW  MANY  SETS 
Op  REFERENCE  DATA  WILL  BE  US<=D  IN  THE  INITIAL  SPTUP. 
NOTE  THAT  pori  IS  WPITTEN  SUCH  THAT  FACH  CHARACTER  OF  ROMI 
IS  FOLLOWED  IMMEOIAtpLy  <SEPAP*TED  BY  ONP  SPACE)  BY  TH<= 
CATEGORY  TO  WHICH  IT  BELONGS.   TWO  LETTERS  JOINFD  BY  A  "-» 
ARE  READ  AS  A  SINGLE  LFTT^o. 

*********************************************************** ; 
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*DATA 


5 

A    V 

A- A 

V 

A-B 

V 

A-E 

V 

l-I 

V 

A-M 

F 

A-R 

V 

B    S 

B-8 

F 

B-V 

s 

C    V 

C-C 

S 

C-F 

V 

C-H 

F 

C-T 

V 

C-Q 

V 

0  s 

D-D 

c 

D-Z 

s 

E    V 

E-E 

V 

E-I 

V 

E-0 

V 

E-R 

V 

E-S 

V 

F    F 

F-F 

s 

G    S 

G-A 

V 

G-B 

p 

G-f 

F 

G-G 

c 

H    F 

H-H 

F 

H-W 

N 

I    V 

I-I 

V 

I-R 

V 

I-T 

V 

I-U 

V 

J    N 

J- A 

F 

J-N 

N 

J -J 

V 

K    S 

K-X 

S 

K-Z 

F 

L    N 

L-L 

N 

M    N 

M-J 

N 

N    M 

N-J 

N 

N-N 

N 

M-Q 

N 

N-U 

c 

0    V 

0-E 

V 

0-0 

V 

C-J 

V 

P    S 

p_c 

s 

Q    F 

Q-A 

F 

Q-Q 

S 

p    n 

p-3 

c 

p-p 

M 

R-T 

N 

S    F 

S-H 

F 

S-S 

F 

T    S 

T-C 

s 

T-H 

F 

T-L 

c 

T-M 

<: 

T-S 

s 

T-T 

s 

U    V 

U-H 

V 

U-0 

V 

J-R 

F 

u-s 

V 

U-T 

V 

U-U 

V 

V    F 

V-V 

V 

W    N 

W-W 

V 

X    F 

x-x 

F 

Y    V 

Y-U 

N 

Y-Y 

V 

Z    F 

Z-C 

F 

Z-H 

F 

Z-Z 

F 

3-P 

V 

A-U    V 
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?DATA 


5 

A    V 

A-A 

V 

A-B 

V 

A-E 

V 

A-I 

V 

A-N 

F 

A-R 

V 

B    S 

B-B 

F 

B-V 

c 

C    V 

C-C 

S 

C-E 

V 

C-H 

F 

C-I 

V 

C-Q 

V 

0   s 

D-D 

S 

D-Z 

s 

E    V 

e-e 

V 

E-I 

V 

E-Q 

V 

E-R 

V 

E-S 

V 

F    F 

F-F 

s 

G    S 

G-A 

V 

G-B 

F 

G-F 

F 

G-G 

S 

H    F 

H-F 

F 

H-W 

N 

I    V 

I-I 

V 

I-R 

V 

I-T 

V 

I-U 

V 

J    M 

J-A 

F 

J-N 

N 

J-U 

V 

K    S 

K-X 

c 

K-Z 

F 

L    N 

L-l 

N 

M    N 

M-J 

N 

N    N 

N-J 

N 

N-N 

N 

N-Q 

N 

N-U 

s 

0    V 

0-E 

V 

0-0 

V 

0-U 

V 

P    S 

P-F 

s 

Q    F 

Q-A 

F 

g-Q 

S 

R    N 

R-6 

F 

R-R 

N 

R-x 

N 

S    F 

S-H 

F 

s-s 

F 

T    S 

T-C 

S 

T-H 

F 

T-L 

s 

T-M 

s 

T-S 

s 
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